Add: org-capture-templates and Fix: telephone-line config

2 files changed, 37 insertions, 4 deletions

diff --git a/shoshimacs.el b/shoshimacs.el
index 8d22251..bee6420 100644
--- a/shoshimacs.el
+++ b/shoshimacs.el
@@ -153,6 +153,18 @@
 
 (package-install 'markdown-mode)
 
+(setq org-default-notes-file (concat org-directory "/notes.org"))
+
+(setq org-capture-templates
+    `(("p" "Protocol" entry (file+headline ,org-default-notes-file "Inbox")
+       "* %^{Title}\nSource: %u, %c\n #+BEGIN_QUOTE\n%i\n#+END_QUOTE\n\n\n%?")
+      ("L" "Protocol Link" entry (file+headline ,org-default-notes-file "Inbox")
+       "* %? [[%:link][%:description]] \nCaptured On: %U")))
+
+(setq org-refile-use-outline-path t
+      org-refile-allow-creating-parent-nodes t
+      org-refile-targets '((nil . (:maxlevel . 2))))
+
 (defun my-org-top-level-heading ()
   (interactive)
   (let ((moo 1))
@@ -376,11 +388,10 @@
 	(accent . (telephone-line-major-mode-segment))
 	(evil   . (telephone-line-airline-position-segment))))
 
+(telephone-line-mode t)
 (set-face-background 'telephone-line-evil-normal "deep pink")
 (set-face-background 'telephone-line-evil-insert "Dark Turquoise")
 
-(telephone-line-mode t)
-
 (defun screenshot-svg ()
   "Save a screenshot of the current frame as an SVG image.
 Saves to a temp file and puts the filename in the kill ring."
diff --git a/shoshimacs.org b/shoshimacs.org
index a7c35ba..41099e3 100644
--- a/shoshimacs.org
+++ b/shoshimacs.org
@@ -643,6 +643,29 @@ the paren balancing. We'll see how it goes
 #+end_src
 
 ** org mode
+*** capture
+
+Org capture is a way to quickly get entries from various places into one of your
+org files.
+
+#+begin_src emacs-lisp
+  (setq org-default-notes-file (concat org-directory "/notes.org"))
+
+  (setq org-capture-templates
+      `(("p" "Protocol" entry (file+headline ,org-default-notes-file "Inbox")
+         "* %^{Title}\nSource: %u, %c\n #+BEGIN_QUOTE\n%i\n#+END_QUOTE\n\n\n%?")
+	("L" "Protocol Link" entry (file+headline ,org-default-notes-file "Inbox")
+         "* %? [[%:link][%:description]] \nCaptured On: %U")))
+#+end_src
+
+*** refile
+
+#+begin_src emacs-lisp
+  (setq org-refile-use-outline-path t
+        org-refile-allow-creating-parent-nodes t
+        org-refile-targets '((nil . (:maxlevel . 2))))
+#+end_src
+
 *** jump to top level parent heading
 
 a friend was wanting this functionality, so i dug around in the org functions
@@ -1251,10 +1274,9 @@ for theme development.
 	  (accent . (telephone-line-major-mode-segment))
 	  (evil   . (telephone-line-airline-position-segment))))
 
+  (telephone-line-mode t)
   (set-face-background 'telephone-line-evil-normal "deep pink")
   (set-face-background 'telephone-line-evil-insert "Dark Turquoise")
-
-  (telephone-line-mode t)
 #+end_src
 
 ** SVG Screenshot