summaryrefslogtreecommitdiffstats
path: root/.emacs.d/site-lisp
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2012-11-08 00:34:15 +0100
committerGravatar Tom Willemsen2012-11-08 00:34:15 +0100
commit57e1063403ffd9519001e39ac92df9abeb42d879 (patch)
treeeb08815982b35c905d93575a037f81d8ddb37408 /.emacs.d/site-lisp
parent60f8f3781744457077683b5618c7fc8068a3da6b (diff)
parent3104a8c298d964662bb09cc5e2a78d4bb1e104d0 (diff)
downloaddotfiles-57e1063403ffd9519001e39ac92df9abeb42d879.tar.gz
dotfiles-57e1063403ffd9519001e39ac92df9abeb42d879.zip
.config/herbstluftwm/autostart
Diffstat (limited to '.emacs.d/site-lisp')
-rw-r--r--.emacs.d/site-lisp/oni.el8
-rw-r--r--.emacs.d/site-lisp/org-init.el25
2 files changed, 28 insertions, 5 deletions
diff --git a/.emacs.d/site-lisp/oni.el b/.emacs.d/site-lisp/oni.el
index 32d84f4..cc16324 100644
--- a/.emacs.d/site-lisp/oni.el
+++ b/.emacs.d/site-lisp/oni.el
@@ -292,11 +292,13 @@ If COUNT has been specified indent by that much, otherwise look at
(defun oni:markdown-mode-func ()
"Function for `markdown-mode-hook'."
+ (setq-local comment-auto-fill-only-comments nil)
(auto-fill-mode)
(whitespace-mode))
(defun oni:message-mode-func ()
"Function for `message-mode-hook'."
+ (setq-local comment-auto-fill-only-comments nil)
(auto-fill-mode)
(flyspell-mode)
(ispell-change-dictionary (read-string "New dictionary: ")))
@@ -561,5 +563,11 @@ for easy selection."
"Function for `write-file-hooks'."
(time-stamp))
+(define-skeleton html-tag
+ "Testing creation of an html tag"
+ "Tagname:"
+ "<" str ("Attribute: " " " str "=\"" (skeleton-read "Value: ") "\"") ">\n"
+ "</" str ">\n")
+
(provide 'oni)
;;; oni.el ends here
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)