[emacs] more re-work of the templates.

I've added a new template to create projects.

1 files changed, 16 insertions, 19 deletions

diff --git a/emacs.d/custom/fcuny-org.el b/emacs.d/custom/fcuny-org.el
index 2e73c2d..d3a3c69 100644
--- a/emacs.d/custom/fcuny-org.el
+++ b/emacs.d/custom/fcuny-org.el
@@ -83,34 +83,28 @@
    `(;; templates for general references, links, etc. They can be relevant for both work and personal learning.
      ("r" "Reference" entry
       (file+headline ,(concat org-directory "/notes.org") "Reference")
-      "* %^{TITLE} %^G\n%?")
+      "* %^{TITLE} %^G\n:PROPERTIES:\n:Created: %U\n:END:\n%?")
      ("e" "Event" entry
       (file+headline ,(concat org-directory "/notes.org") "Event")
-      "* %^{EVENT}\n
-:PROPERTIES:
-:Created: %U
-:Location: %^{prompt}
-:END:
-%?")
-
+      "* %^{EVENT}\n:PROPERTIES:\n:Created: %U\n:Location: %^{prompt}\n:END:\n%?")
      ("b" "Bookmark" entry
-      (file+headline ,(concat org-directory "/notes.org") "Bookmarks")
-      "* %(fcuny/get-page-title (current-kill 0)) %^g
-:PROPERTIES:
-:Created: %U
-:ReadLater: %^{read later|Yes|No}
-:Effort: %^{effort|1:00|0:05|0:15|0:30|2:00|4:00|5:00}
-:END:
-%?")
+      (file+headline ,(concat org-directory "/notes.org") "Bookmark")
+      "* %(fcuny/get-page-title (current-kill 0)) %^g\n:PROPERTIES:\n:Created: %U\n:ReadLater: %^{read later|Yes|No}\n:Effort: %^{effort|1:00|0:05|0:15|0:30|2:00|4:00|5:00}\n:END:\n%?")
+     ("q" "Quotes" entry
+      (file+headline ,(concat org-directory "/notes.org") "Quote")
+      "* %^{TITLE}\n:PROPERTIES:\n:Created: %U\n:Page: %^{page}\n:END:\n%?")
 
      ;; templates for personal things only.
      ("t" "Personal Todo" entry
       (file+headline ,(concat org-directory "/personal/tasks.org") "Personal tasks")
-      "* TODO [#4] %?\n")
+      "* TODO [#4] %?\n:PROPERTIES:\n:Created: %U\n:END:")
      ("j" "Personal Journal" entry
       (file+olp+datetree ,(concat org-directory "/personal/journal.org"))
       "* %U %?\n"
       :tree-type week)
+     ("p" "New Personal Project" entry
+      (file ,(concat org-directory "/twitter/projects.org"))
+      (file ,(concat fcuny/path-emacs-etc "/new-project.org")))
 
      ;; personal weekly review
      ("w" "Weekly Review" entry
@@ -121,7 +115,7 @@
      ;; templates for work related things only.
      ("T" "Work Todo" entry
       (file+headline ,(concat org-directory "/twitter/tasks.org") "Twitter related tasks")
-      "* TODO [#4] %?\n")
+      "* TODO [#4] %?\n:PROPERTIES:\n:Created: %U\n:END:")
      ("J" "Work Journal" entry
       (file+olp+datetree ,(concat org-directory "/twitter/journal.org"))
       "* %U %?\n"
@@ -132,11 +126,14 @@
      ("M" "Meeting" entry
       (file+olp+datetree ,(concat org-directory "/twitter/meetings.org"))
       "* %U %^{TITLE}\n%?")
+     ("P" "New Twitter Project" entry
+      (file ,(concat org-directory "/twitter/projects.org"))
+      (file ,(concat fcuny/path-emacs-etc "/new-project.org")))
 
      ;; refile!
      ("I" "Inbox, refile later" entry
       (file ,(concat org-directory "/inbox.org"))
-      "* %?"))))
+      "* %?\n:PROPERTIES:\n:Created: %U\n:END:"))))
 
 (use-package htmlize
   :ensure t)