.emacs.d/site-lisp/org-init.el

1 files changed, 20 insertions, 5 deletions

diff --git a/.emacs.d/site-lisp/org-init.el b/.emacs.d/site-lisp/org-init.el
index 7345f91..6f28432 100644
--- a/.emacs.d/site-lisp/org-init.el
+++ b/.emacs.d/site-lisp/org-init.el
@@ -34,13 +34,27 @@
   '(org-crypt-use-before-save-magic))
 
 (setq org-agenda-custom-commands
-      '(("wt" "Work todo."
-         tags-todo "CATEGORY=\"Work\"")
-        ("wm" "Myaethon2 todo."
-         tags-todo "CATEGORY=\"myaethon2\"")))
+      '(("pa" "Avandu" tags-todo "slug=\"avandu\"")
+        ("pb" "Blog" tags-todo "slug=\"blog\"")
+        ("pc" "Configuration" tags-todo "slug=\"configuration\"")
+        ("pd" "dispass.el" tags-todo "slug=\"dispass.el\"")
+        ("pD" "DVDroid" tags-todo "slug=\"dvdroid\"")
+        ("pe" "Eye on Manga" tags-todo "slug=\"eye-on-manga\"")
+        ("pG" "gDisPass" tags-todo "slug=\"gdispass\"")
+        ("pg" "gitto" tags-todo "slug=\"gitto\"")
+        ("pi" "Ideas" tags-todo "slug=\"ideas\"")
+        ("pM" "Maintenance" tags-todo "slug=\"maintenance\"")
+        ("pme" "Metal Express Radio.el" tags-todo
+         "slug=\"metal-express-radio.el\"")
+        ("pmo" "Mode Icons" tags-todo "slug=\"mode-icons\"")
+        ("pmy1" "myAethon" tags-todo "slug=\"myaethon\"")
+        ("pmy2" "myAethon2" tags-todo "slug=\"myaethon2\"")
+        ("ps" "Sawfish Naquadah theme" tags-todo
+         "slug=\"sawfish-naquadah-theme\"")
+        ("w" "Work todo." tags-todo "work")))
 (setq org-agenda-sorting-strategy
       '((agenda habit-down time-up priority-down category-keep)
-        (todo priority-down tag-up category-up)
+        (todo priority-down category-keep)
         (tags priority-down category-keep)
         (search category-keep)))
 (setq org-agenda-tags-column -101)
@@ -101,6 +115,7 @@
         ("ACQUIRE"     :background "red")
         ("IGNORED"     :background "#555555")))
 (setq org-use-fast-todo-selection t)
+(setq org-use-property-inheritance '("slug"))
 
 (add-to-list 'org-modules 'habit)