From mboxrd@z Thu Jan 1 00:00:00 1970 From: Matthew Lundin Subject: Re: POLL: the 40 variables project Date: Thu, 29 Jan 2009 08:10:26 -0600 Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1LSXbJ-000327-Po for emacs-orgmode@gnu.org; Thu, 29 Jan 2009 09:10:37 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1LSXbI-00030b-Bs for emacs-orgmode@gnu.org; Thu, 29 Jan 2009 09:10:36 -0500 Received: from [199.232.76.173] (port=34892 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1LSXbI-00030A-3L for emacs-orgmode@gnu.org; Thu, 29 Jan 2009 09:10:36 -0500 Received: from out4.smtp.messagingengine.com ([66.111.4.28]:60575) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1LSXbH-0000Jc-Ki for emacs-orgmode@gnu.org; Thu, 29 Jan 2009 09:10:35 -0500 In-Reply-To: (Carsten Dominik's message of "Thu\, 29 Jan 2009 09\:49\:21 +0100") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Carsten Dominik , emacs-orgmode@gnu.org Hi Carsten, > Hi, > > yesterday I did this command in my org-mode git repo: > > grep defcustom lisp/*el |wc -l > > and got 378 as an answer. 378 user-customizable variables, > no kidding. Yes, I'm afraid I've used a fair number of those myself at one point or another. I've attached my list of variables. Some of the settings are set to the default, but their still in my .emacs file as a result of switching them on and off. I certainly don't use a majority of the variables, but it's nice to know they are there. Perhaps in customization there could be a distinction between "basic" (or "setup") and "advanced" variables. The basic variables could be those that most org users adjust--the ones that have the most visible consequences and are central to the core functionality of org (org-directory, for instance). The advanced variables could then be for those hopeless souls, like myself, who spend far too much time tweaking. Best, Matt ------- (setq org-log-done 'time) (setq org-log-repeat 'time) ;; If I want a note, I set it using LOGGING property (setq org-global-properties '(("Effort_ALL" . "0:05 0:10 0:15 0:30 0:45 1:00 1:30 2:00 3:00 4:00 5:00 6:00 7:00 8:00"))) (setq org-columns-default-format "%50ITEM(Task) %8Effort(Estimate){:} %20SCHEDULED %20DEADLINE") (setq org-agenda-columns-compute-summary-properties nil) (setq org-blank-before-new-entry '((heading) (plain-list-item . auto))) ;; I like a blank line for plain lists, but not for headings (setq org-clock-in-switch-to-state "STARTED") (setq org-clock-remove-zero-time-clocks t) ;; shows only closed items in the agenda log ;; I have some custom commands that show more (setq org-agenda-log-mode-items '(closed)) (setq org-drawers '("PROPERTIES" "CLOCK" "HIDDEN" "INFO")) ;; puts footnotes at end of current outline section -- also with sorting (setq org-footnote-section nil) (setq org-footnote-auto-label 'nil) (setq org-archive-location (concat "~/mystuff/org/" (format-time-string "%Y") ".archive::* %s")) ;; puts archive in a single file, organized by file of origin (setq org-archive-save-context-info '(olpath time itags)) ;; other options include file, time, ltags (local tags), itags (inherited tags), category (setq org-archive-mark-done nil) (setq org-attach-method 'cp) (setq org-attach-directory "~/mystuff/data") (setq org-use-fast-todo-selection t) (setq org-todo-keywords '((sequence "TODO(t)" "NOW(n)" "STARTED(s)" "|" "DONE(d)") (sequence "PROJECT(p)" "SUBPROJ(u)" "HOLD(h)" "|" "SOMEDAY(y)" "COMPLETE(c)") (sequence "GOAL(g)" "|" "ACHIEVED(a)") (sequence "WAITING(w@/!)" "|" "RESOLVED(r@)") (sequence "BORROWED(1@)" "|" "RETURNED(2@)") (sequence "ORDERED(3@)" "|" "RECEIVED(4@)") (sequence "LATER(l)" "|" "MAYBE(m)" "CANCELED(x@/!)"))) (setq org-todo-state-tags-triggers '(("NOW" ("NEXT" . t) ("DEFERRED" . nil)) ("TODO" ("NEXT" . nil) ("DEFERRED" . nil)) ("PROJECT" ("DEFERRED" . nil)) ("STARTED" ("NEXT" . t) ("DEFERRED")) ("LATER" ("DEFERRED" . t) ("NEXT" . nil)) ("HOLD" ("DEFERRED" . t) ("NEXT" . nil)) ("" ("NEXT" . nil) ("DEFERRED" . nil)) (done ("DEFERRED" . nil) ("NEXT" . nil)))) (add-to-list 'org-structure-template-alist '("d" "#+begin_ditaa \n?\n#+end_ditaa")) (setq org-fast-tag-selection-single-key 'expert) (setq org-tag-alist '((:startgroup . nil) ("home" . ?h) ("office" . ?o) ("errands" . ?e) ("library" . ?l) ("travel" . ?t) (:endgroup . nil) (:startgroup . nil) ("computer" . ?c) ("rwb" . ?r) ("phone" . ?p) (:endgroup . nil) (:endgroup . nil) (:startgroup . nil) ("prof" . ?1) ("per" . ?2) (:endgroup . nil) ("noexport" . ?N) (:startgroup . nil) ("DEFERRED" . ?d) ("NEXT" . ?n) (:endgroup . nil) ("DAILY" . ?.))) (setq org-refile-targets '((org-agenda-files :maxlevel . 2))) (setq org-goto-interface 'outline-path-completion) (setq org-outline-path-complete-in-steps t) (setq org-completion-use-ido nil) (setq org-refile-use-outline-path 'file) (setq org-special-ctrl-k t) (setq org-stuck-projects '("/!+PROJECT" ("TODO" "SUBPROJ" "NOW" "STARTED" "WAITING") nil "")) (setq org-agenda-skip-unavailable-files t) (setq org-agenda-time-grid nil) (setq org-agenda-sorting-strategy '((agenda time-up priority-down effort-down) (todo todo-state-up priority-down category-up) (tags priority-down category-up))) (setq org-sort-agenda-noeffort-is-high nil) (setq org-agenda-include-diary nil) (setq org-agenda-ndays 1) ;; limit org-agenda to one day (setq org-agenda-show-inherited-tags nil) (setq org-agenda-window-setup 'other-window) (setq org-agenda-restore-windows-after-quit t) (setq org-agenda-start-on-weekday 1) (setq org-show-entry-below '((default . nil) (isearch .t ) (agenda . t))) (setq org-show-siblings '((default . nil) (isearch . t) (agenda . t))) (setq org-agenda-custom-commands '(("P" . "Printed agendas") ("Pg" "GTD agenda" ((todo "NOW|STARTED") (agenda "" ((org-agenda-ndays 1) (org-deadline-warning-days 7) (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline 'regexp "\\* \\(NOW\\|STARTED\\)")) (org-agenda-sorting-strategy '(priority-down tag-up)) (org-agenda-todo-keyword-format "[ ]") (org-agenda-scheduled-leaders '("" "")) (org-agenda-prefix-format "%t%s"))) (tags-todo "office/!+TODO" ((org-agenda-overriding-header "Office\n-------"))) (tags-todo "computer/!+TODO" ((org-agenda-overriding-header "Computer\n-------"))) (tags-todo "rwb/!+TODO" ((org-agenda-overriding-header "RWB\n-------"))) (tags-todo "phone/!+TODO" ((org-agenda-overriding-header "Phone\n-------"))) (tags-todo "home/!+TODO" ((org-agenda-overriding-header "Home\n-------"))) (tags-todo "errands/!+TODO" ((org-agenda-overriding-header "Errands\n------")))) ((org-agenda-with-colors nil) (org-agenda-todo-ignore-with-date t) (org-agenda-block-separator "------") (org-agenda-prefix-format "") (org-agenda-todo-keyword-format "[ ]") (org-agenda-remove-tags t))) ("Pc" "Calendar" agenda "" ((org-agenda-ndays 30) (org-agenda-start-on-weekday nil) (org-agenda-repeating-timestamp-show-all t) (org-agenda-with-colors nil) (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline 'scheduled)))) ("p" . "Priorities") ("pa" "A items" tags-todo "+PRIORITY=\"A\"") ("pb" "B items" tags-todo "+PRIORITY=\"B\"") ("pc" "C items" tags-todo "+PRIORITY=\"C\"") ("pp" "A, B, & C" tags-todo "PRIORITY=\"A\"|PRIORITY=\"B\"|PRIORITY=\"C\"") ("g" . "GTD Contexts") ("go" "Office" tags-todo "office") ("gc" "Computer" tags-todo "computer") ("gp" "Phone" tags-todo "phone") ("gh" "Home" tags-todo "home") ("ge" "Errands" tags-todo "errands") ("gt" "Travel" tags-todo "travel") ("gb" "GTD Block Agenda" ((tags-todo "office") (tags-todo "computer") (tags-todo "phone") (tags-todo "home") (tags-todo "errands"))) ("S" . "Searches") ("Sw" "Website search" search "" ((org-agenda-files (file-expand-wildcards "~/mystuff/website/*.org")))) ("A" "Agenda with todos" agenda "" ((org-agenda-ndays 1) (org-agenda-sorting-strategy '(time-up priority-down todo-state-down)) (org-agenda-todo-ignore-scheduled t) (org-agenda-include-all-todo t))) ("r" . "Reviews") ("ra" "Agenda - Next seven days" agenda "" ;; this is after the daily review is done ((org-agenda-repeating-timestamp-show-all t) (org-agenda-ndays 7) (org-agenda-start-on-weekday nil))) ("rd" "Daily Review" ((stuck "") (stuck "" ((org-stuck-projects '("/!+SUBPROJ" ("TODO" "NOW" "STARTED" "WAITING") nil "")))) (todo "PROJECT|SUBPROJ") (todo "TODO|NOW|STARTED") (todo "WAITING|ORDERED|BORROWED" ((org-agenda-sorting-strategy '(priority-down category-up)))))) ("rw" "Weekly Review Block" ((stuck "" ((org-stuck-projects '("/!+GOAL" ("TODO" "PROJECT" "NOW" "STARTED" "WAITING") nil "")))) (stuck "") (stuck "" ((org-stuck-projects '("/!+SUBPROJ" ("TODO" "NOW" "STARTED" "WAITING") nil "")))) (todo "GOAL") (todo "PROJECT") (todo "SUBPROJ") (todo "HOLD") ;; Projects & goals on ice (todo "LATER") ;; Review later items (agenda "" ((org-agenda-ndays 7) (org-agenda-time-grid nil) (org-agenda-start-on-weekday nil))))) ("rm" "Monthly Review" ((todo "SOMEDAY") (todo "MAYBE"))) ("rl" "Daily log" ((agenda "" ((org-agenda-ndays 1) ;; (org-agenda-start-day (format-time-string "%Y-%m-%d" (my-yesterday-time))) ;; starts with yesterday (org-agenda-log-mode-items '(closed state)) (org-agenda-show-log t))))) ;; shows log ("rz" "Without deadlines" agenda "" ((org-agenda-ndays 1) (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline)))) ("rp" "Project overview" ((stuck "") (todo "GOAL") (todo "PROJECT") (todo "SUBPROJ") (todo "HOLD"))) ("rt" "Todo overview" ((todo "STARTED") (todo "TODO") (todo "WAITING|ORDERED|BORROWED") ;; review waiting items (todo "LATER"))) ("c" . "Calendars") ("cc" "Weekly schedule" agenda "" ((org-agenda-ndays 7) (org-agenda-start-on-weekday 1) (org-agenda-repeating-timestamp-show-all t) (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline 'scheduled)))) ("cn" "Next 14 days" agenda "" ((org-agenda-ndays 14) (org-agenda-start-on-weekday nil) (org-agenda-repeating-timestamp-show-all t) (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline 'scheduled)))) ("cm" "Next 30 days" agenda "" ((org-agenda-ndays 30) (org-agenda-start-on-weekday nil) (org-agenda-repeating-timestamp-show-all t) (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline 'scheduled)))) ("u" . "Upcoming deadlines") ("uw" "Upcoming deadlines (one week)" agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled)) (org-agenda-ndays 1) (org-deadline-warning-days 7) (org-agenda-time-grid nil))) ("u2" "Upcoming deadlines (two weeks)" agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled)) (org-agenda-ndays 1) (org-deadline-warning-days 14) (org-agenda-time-grid nil))) ("um" "Upcoming deadlines (one month)" agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled)) (org-agenda-ndays 1) (org-deadline-warning-days 30) (org-agenda-time-grid nil))) ("uq" "Upcoming deadlines (three months)" agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled)) (org-agenda-ndays 1) (org-deadline-warning-days 60) (org-agenda-time-grid nil))) ("uh" "Upcoming deadlines (half year)" agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled)) (org-agenda-ndays 1) (org-deadline-warning-days 180) (org-agenda-time-grid nil))) ("uy" "Upcoming deadlines (1 year)" agenda "" ((org-agenda-skip-function '(org-agenda-skip-entry-if 'scheduled)) (org-agenda-ndays 1) (org-deadline-warning-days 365) (org-agenda-time-grid nil))) ("d" . "Next") ("dd" "Today (all)" ((todo "NOW|STARTED") (agenda "" ((org-agenda-ndays 1) (org-agenda-skip-function '(org-agenda-skip-entry-if 'regexp "\\* \\(NOW\\|STARTED\\)")))) (todo "TODO" ((org-agenda-starting-strategy '(priority-down category-up)) (org-agenda-todo-ignore-with-date t))) (todo "WAITING|ORDERED|BORROWED" ((org-agenda-sorting-strategy '(priority-down category-up)))))) ("dt" "Today" ((todo "NOW|STARTED") (agenda "" ((org-agenda-ndays 1) (org-agenda-skip-function '(org-agenda-skip-entry-if 'regexp "\\* \\(NOW\\|STARTED\\)")))))) ;; if you want to skip daily tasks in the agenda view ;; (org-agenda-skip-function '(org-agenda-skip-entry-if 'regexp "\\* \\(NOW\\|STARTED\\)\\|:DAILY:")))))) ("dn" "Now" todo "NOW|STARTED") ("dh" "Daily habits" ((agenda "")) ((org-agenda-show-log t) (org-agenda-ndays 7) (org-agenda-log-mode-items '(state)) (org-agenda-skip-function '(org-agenda-skip-entry-if 'notregexp ":DAILY:")))) ("de" "Effort" ((todo "NOW|STARTED") (agenda "" ((org-agenda-ndays 1) (org-agenda-skip-function '(org-agenda-skip-entry-if 'regexp "\\* \\(NOW\\|STARTED\\|PROJECT\\|GOAL\\)"))))) ((org-agenda-view-columns-initially t))) ("da" "Active" todo "GOAL|PROJECT|SUBPROJ|TODO|NOW|STARTED" ((org-agenda-sorting-strategy '(category-up)))) ("dp" "Projects" todo "PROJECT|SUBPROJ") ("dc" "Clock report" agenda "" ((org-agenda-ndays 1) (org-agenda-start-with-clockreport-mode t) (org-agenda-time-grid nil) (org-agenda-skip-function '(org-agenda-skip-entry-if 'notscheduled 'deadline 'scheduled)))))) (setq org-agenda-skip-scheduled-if-done t) (setq org-agenda-skip-deadline-if-done t) (setq org-agenda-repeating-timestamp-show-all nil) (org-remember-insinuate) (setq org-directory "~/mystuff/org/") (setq org-default-notes-file (concat org-directory "index.org")) (setq org-remember-store-without-prompt t) ;; Remember templates (setq org-remember-templates '( (?t "* TODO %^{Todo} %^G\n %i\n %a\n %U\n") (?T "* TODO %^{Todo} %^G\n %i\n %U\n") (?a "* %^{Appt} %t%?\n %i\n %a\n") (?A "* %^{Appt} %t%?\n %i\n") (?n "* %^{Title}\n %i\n %a\n %U\n") (?N "* %^{Title}\n %i\n %U\n") (?w "* %a\n %?\n %i\n %U\n") (?W "* %a\n %? %i\n"))) (setq org-publish-project-alist '( ("org-notes" :base-directory "~/mystuff/website/" :base-extension "org" :publishing-directory "path/to/directory" :section-numbers nil :email "Matthew.Lundin@valpo.edu" :publishing-function org-publish-org-to-html :table-of-contents nil ;; :auto-index t ;; :index-filename "pagelist.org" ;; :index-title "Page List" :recursive t :style "" ;;:style-include-default nil :preamble "
Matthew Lundin
" :postamble "
" ) ("org-static" :base-directory "~/mystuff/website/" :publishing-directory "/path/to/directory" :recursive t :base-extension "css\\|js\\|png\\|jpg\\|gif\\|pdf\\|mp3\\|ogg\\|swf" :publishing-function org-publish-attachment ) ("org" :components ("org-notes" "org-static")) ))