From a428a2903e6a94c5f08a57599b6e2c6861c85107 Mon Sep 17 00:00:00 2001
From: Joel Grunbaum <joelgrun@gmail.com>
Date: Sun, 31 May 2020 12:39:32 +0000
Subject: [PATCH] Added new theme, org latex spellcheck, journaling hooks not static-blog

---
 config.org |   68 +++++++++++++++++++++++++++++++++-
 1 files changed, 66 insertions(+), 2 deletions(-)

diff --git a/config.org b/config.org
index ae1c587..ad8d81c 100644
--- a/config.org
+++ b/config.org
@@ -40,6 +40,13 @@
            (load-theme 'doom-one t)
            (doom-themes-visual-bell-config)
            (doom-themes-org-config)))
+        ((eq emacs-theme 'nord)
+         (use-package nord-theme
+           :ensure t
+           :init
+           (disable-all-themes)
+           :config
+           (load-theme 'nord t)))
         ((eq emacs-theme 'none)
          (disable-all-themes)))
 #+END_SRC
@@ -74,6 +81,7 @@
   ;; (add-hook 'latex-mode-hook 'flyspell-buffer)
   (add-hook 'org-mode-hook 'flyspell-mode)
   ;; (add-hook 'org-mode-hook 'flyspell-buffer)
+
 #+END_SRC
 
 ** Switch-window
@@ -779,7 +787,7 @@
     (semantic-mode 1))
 #+END_SRC
 
-*** EDE
+*** COMMENT EDE
 Emacs Development Environment.
 Can be used to manage and create build files for a project.
 #+BEGIN_SRC emacs-lisp
@@ -1123,6 +1131,12 @@
 (diminish 'org-indent-mode)
 (diminish 'visual-line-mode)
 #+END_SRC
+*** Spell checking for code and latex
+#+BEGIN_SRC emacs-lisp
+  (add-to-list 'ispell-skip-region-alist '("#\\+BEGIN_SRC" . "#\\+END_SRC"))
+  (add-to-list 'ispell-skip-region-alist '("\\$" . "\\$"))
+  (add-to-list 'ispell-skip-region-alist '("\\$\\$" . "\\$\\$"))
+#+END_SRC
 
 ** Line wrapping
 Enable line wrapping for long lines.
@@ -1204,7 +1218,7 @@
     (setq emms-source-file-directory "~/Music/"))
 #+END_SRC
 
-* Org Blog
+* COMMENT Org Blog
 I use org to write my blog and use org-static-blog to generate the HTML.
 ** Org static blog config
 Basic configuration for site.
@@ -1305,3 +1319,53 @@
     :ensure t)
 #+END_SRC
 
+* Journaling
+** Noteworthy entries
+I write weekly journal entries recapping my week.
+These files are in org mode.
+This is inspired by org-static-blog.
+#+BEGIN_SRC emacs-lisp
+  (defun journal-create-new-post ()
+      "Create a new entry, prompt for title and insert header"
+    (interactive)
+    (let ((title (read-string "Title: ")))
+      (find-file (concat "~/Documents/Journal/entry/"
+                         (read-string "Filename: "
+                                      (concat (format-time-string "%Y-%m-%d-" (current-time))
+                                              (replace-regexp-in-string "\s" "-" (downcase title))
+                                              ".org"))))
+      (insert "#+title: " title "\n"
+              "#+date: " (format-time-string "<%Y-%m-%d %H:%M>") "\n"
+              "#+filetags: ")))
+#+END_SRC
+*** Publish entries
+Use org-publish to collate entries into a single unit.
+#+BEGIN_SRC emacs-lisp
+  (setq org-publish-project-alist
+               '(("Journal"
+                 :base-directory "~/Documents/Journal/entry/"
+                 :publishing-directory "~/Documents/Journal/out/"
+                 :publishing-function org-html-publish-to-html
+                 :htmlized-source t
+                 :section-numbers nil
+                 :html-preamble t
+                 :validation-link nil
+                 ;; :makeindex t
+                 :auto-sitemap t
+                 :sitemap-file-entry-format "%d"
+                 :sitemap-format-entry (concat (org-publish-find-date) " - " (org-publish-find-title)))))
+#+END_SRC
+** COMMENT Daily
+Using Org-Journal for daily journaling.
+Package provides journaling support files for org mode.
+#+BEGIN_SRC emacs-lisp
+  (use-package org-journal
+    :ensure t
+    :custom
+    (org-journal-dir "~/Documents/Journal/daily")
+    (org-journal-date-format "%A, %d %B %Y")
+    (org-journal-time-format "%I:%M %p")
+    (org-journal-file-type "daily"))
+#+END_SRC
+
+

--
Gitblit v1.9.3