summaryrefslogtreecommitdiff
path: root/init
diff options
context:
space:
mode:
Diffstat (limited to 'init')
-rw-r--r--init/km-haskell.el4
-rw-r--r--init/km-org.el55
2 files changed, 29 insertions, 30 deletions
diff --git a/init/km-haskell.el b/init/km-haskell.el
index 58bc2c8..e687cf3 100644
--- a/init/km-haskell.el
+++ b/init/km-haskell.el
@@ -1,3 +1 @@
-;; randomly chose one of three given in help
-(custom-set-variables
- '(haskell-mode-hook '(turn-on-haskell-indentation)))
+(add-hook 'haskell-mode-hook 'turn-on-haskell-indentation)
diff --git a/init/km-org.el b/init/km-org.el
index 4a2bf4b..6416260 100644
--- a/init/km-org.el
+++ b/init/km-org.el
@@ -28,33 +28,34 @@
("X" "misc clipboard" entry (file+headline "~/notes/misc.org" "Inbox")
"* %?\n%x")))
-(custom-set-variables
- '(org-agenda-files (quote ("~/notes/calendar.org" "~/notes/tasks.org")))
- '(org-default-notes-file "~/notes/tasks.org")
- '(org-agenda-ndays 7)
-;; '(org-deadline-warning-days 14)
- '(org-agenda-show-all-dates t)
- '(org-agenda-skip-deadline-if-done t)
- '(org-agenda-skip-scheduled-if-done t)
- '(org-agenda-start-on-weekday nil)
- '(org-reverse-note-order t)
- '(org-fast-tag-selection-single-key (quote expert))
- '(org-agenda-custom-commands
- (quote (("d" todo "DONE" nil)
- ("s" todo "STARTED" nil)
- ("A" agenda ""
- ((org-agenda-skip-function
- (lambda nil
- (org-agenda-skip-entry-if (quote notregexp) "\\=.*\\[#A\\]")))
- (org-agenda-ndays 1)
- (org-agenda-overriding-header "Today's Priority #A tasks: ")))
- ("u" "Unschedule TODO entries" alltodo ""
- ((org-agenda-skip-function
- (lambda nil
- (org-agenda-skip-entry-if (quote scheduled) (quote deadline)
- (quote regexp) "\n]+>")))
- (org-agenda-overriding-header "Unscheduled TODO entries: ")))
- ("p" "Past timestamps" tags "TIMESTAMP<=\"<now>\"")))))
+(setq org-agenda-files '("~/notes/calendar.org" "~/notes/tasks.org"))
+(setq org-default-notes-file "~/notes/tasks.org")
+
+(setq org-agenda-ndays 7)
+(setq org-agenda-show-all-dates t)
+(setq org-agenda-skip-deadline-if-done t)
+(setq org-agenda-skip-scheduled-if-done t)
+(setq org-agenda-start-on-weekday nil)
+(setq org-reverse-note-order t)
+(setq org-fast-tag-selection-single-key 'expert)
+
+(setq org-agenda-custom-commands
+ '(("d" todo "DONE" nil)
+ ("s" todo "STARTED" nil)
+ ("A" agenda ""
+ ((org-agenda-skip-function
+ (lambda nil
+ (org-agenda-skip-entry-if 'notregexp "\\=.*\\[#A\\]")))
+ (org-agenda-ndays 1)
+ (org-agenda-overriding-header "Today's Priority #A tasks: ")))
+ ("u" "Unschedule TODO entries" alltodo ""
+ ((org-agenda-skip-function
+ (lambda nil
+ (org-agenda-skip-entry-if 'scheduled 'deadline
+ 'regexp "\n]+>")))
+ (org-agenda-overriding-header "Unscheduled TODO entries: ")))
+ ("p" "Past timestamps" tags "TIMESTAMP<=\"<now>\"")))
+
(defvar km/org-additional-notes-files '("~/notes/backburner.org"
"~/notes/misc.org")