(defvar mdw-black-background t)
+(eval-after-load "outline" '(require 'foldout))
+
(setq cltl2-root-url (mdw-config 'cltl-url))
(setq common-lisp-hyperspec-root (mdw-config 'hyperspec-url))
(global-set-key [?\C-x ?w ?j] 'windmove-down)
(global-set-key [?\C-x ?w right] 'windmove-right)
(global-set-key [?\C-x ?w ?l] 'windmove-right)
+(global-set-key [?\C-x ?g ?l] 'org-store-link)
+(global-set-key [?\C-x ?g ?a] 'org-agenda)
+ (global-set-key [?\C-x ?t ?i] 'timeclock-in)
+ (global-set-key [?\C-x ?t ?c] 'timeclock-change)
+ (global-set-key [?\C-x ?t ?o] 'timeclock-out)
+ (global-set-key [?\C-x ?t ?r] 'timeclock-reread-log)
+ (global-set-key [?\C-x ?t ?w] 'timeclock-workday-remaining-string)
+ (global-set-key [?\C-x ?t ?s] 'timeclock-status-string)
(global-set-key [?\M-#] 'calc-dispatch)
(global-set-key [?\C-x ?/] 'auto-fill-mode)
(global-set-key [?\C-x ?w ?d] 'mdw-divvy-window)
("\\.m$" . objc-mode)
("\\.mxd$" . c-mode)
("\\.cs" . csharp-mode)
+ ("\\.org$" . org-mode)
;; ("/[ch]/" . c-mode)
(,(concat "/\\("
"\\.stgit\\.msg" "\\|"