'(iswitchb-prompt-newbuffer nil)
'(log-edit-keep-buffer t)
'(mail-user-agent (quote sendmail-user-agent))
+ '(markdown-enable-math t)
+ '(markdown-follow-wiki-link-on-enter nil)
'(mutt-alias-file-list (quote ("~/.mutt/aliases" "~/.mail_aliases")))
- '(org-agenda-files (quote ("~/projects/debbugs/notes.org" "~/projects/notes/notes.org" "~/projects/origins_of_life/paper/figure_list.org" "~/projects/origins_of_life/ool.org" "~/projects/sysadmin/sndservers/notes.org" "~/projects/chaim/chaim.org" "~/projects/fh/fh.org" "~/projects/notes/library_books.org")))
+ '(org-agenda-files (quote ("~/projects/debbugs/notes.org" "~/projects/notes/notes.org" "~/projects/origins_of_life/paper/figure_list.org" "~/projects/origins_of_life/ool.org" "~/projects/sysadmin/sndservers/sndservers.org" "~/projects/chaim/chaim.org" "~/projects/fh/fh.org" "~/projects/notes/library_books.org")))
'(post-email-address "don@donarmstrong.com")
'(post-kill-quoted-sig nil)
'(post-mail-message "mutt\\(ng\\|\\)-[a-z0-9]+-[0-9]+-.*")
(lambda () (interactive) (cond ((looking-at "^##### ") 1)((looking-at "^#### ") 2)((looking-at "^[a-zA-Z0-9_\.]+ ?<- ?function(.*{") 3) (t 1000)))
)))
+ ; Outline-minor-mode key map
+ (define-prefix-command 'cm-map nil "Outline-")
+ ; HIDE
+ (define-key cm-map "q" 'hide-sublevels) ; Hide everything but the top-level headings
+ (define-key cm-map "t" 'hide-body) ; Hide everything but headings (all body lines)
+ (define-key cm-map "o" 'hide-other) ; Hide other branches
+ (define-key cm-map "c" 'hide-entry) ; Hide this entry's body
+ (define-key cm-map "l" 'hide-leaves) ; Hide body lines in this entry and sub-entries
+ (define-key cm-map "d" 'hide-subtree) ; Hide everything in this entry and sub-entries
+ ; SHOW
+ (define-key cm-map "a" 'show-all) ; Show (expand) everything
+ (define-key cm-map "e" 'show-entry) ; Show this heading's body
+ (define-key cm-map "i" 'show-children) ; Show this heading's immediate child sub-headings
+ (define-key cm-map "k" 'show-branches) ; Show all sub-headings under this heading
+ (define-key cm-map "s" 'show-subtree) ; Show (expand) everything in this heading & below
+ ; MOVE
+ (define-key cm-map "u" 'outline-up-heading) ; Up
+ (define-key cm-map "n" 'outline-next-visible-heading) ; Next
+ (define-key cm-map "p" 'outline-previous-visible-heading) ; Previous
+ (define-key cm-map "f" 'outline-forward-same-level) ; Forward - same level
+ (define-key cm-map "b" 'outline-backward-same-level) ; Backward - same level
+ (global-set-key "\M-o" cm-map)
+
(defun my-org-mode-setup ()
(when (and (buffer-file-name)
(file-exists-p (buffer-file-name)))
(define-key org-mode-map "\C-c\C-g" 'reftex-citation)
)
(add-hook 'org-mode-hook 'my-org-mode-setup)
+
+(setq org-mobile-directory "/rzlab.ucr.edu:/sites/dav.donarmstrong.com/root/org/")
+(setq org-directory "/home/don/org-mode/")
+(setq org-mobile-inbox-for-pull "/home/don/org-mode/from-mobile.org")