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