users/bzg.org

   1 #+OPTIONS:    H:3 num:nil toc:t \n:nil @:t ::t |:t ^:t -:t f:t *:t TeX:t LaTeX:t skip:nil d:(HIDE) tags:not-in-toc
   2 #+STARTUP:    align fold nodlcheck hidestars oddeven lognotestate
   3 #+SEQ_TODO:   TODO(t) INPROGRESS(i) WAITING(w@) | DONE(d) CANCELED(c@)
   4 #+TAGS:       Write(w) Update(u) Fix(f) Check(c)
   5 #+TITLE:      Bastien's Worg page
   6 #+AUTHOR:     Bastien
   7 #+EMAIL:      bzg AT altern DOT org
   8 #+LANGUAGE:   en
   9 #+PRIORITIES: A C B
  10 #+CATEGORY:   worg
  11
  12 [[file:../index.org][{Back to Worg's index}]]
  13
  14 Here I store thoughts and code about Org, along with links to some
  15 tutorials I wrote.
  16
  17 * Webpages published with Org
  18
  19 - My [[http://lumiere.ens.fr/~guerry/][homepage]]
  20
  21 * Tutorials
  22
  23 - [[file:org-tutorials/org-column-screencast.org][Org Column screencast]]
  24 - [[file:org-tutorials/org-column-view-tutorial.org][Org Column Tutorial]]
  25 - [[file:org-tutorials/org-spreadsheet-intro.org][Introduction to Org spreadsheet system]]
  26 - [[file:org-tutorials/orgtutorial_dto-fr.org][Translation of David O'Toole tutorial]]
  27 - [[file:org-tutorials/tables.org][Introduction to tables in Org]]
  28 - [[http://lumiere.ens.fr/~guerry/org-playing-with-lists-screencast.php]["Playing with plain lists" screencast]]
  29
  30 * My configuration
  31
  32 Here is my Org configuration.
  33
  34 ** Agenda variables
  35
  36 | Variable                              | Value                                              | Why?                               |
  37 |                                       | <50>                                               |                                    |
  38 |---------------------------------------+----------------------------------------------------+------------------------------------|
  39 | org-agenda-file-regexp                | "\\.org\\'"                                        |                                    |
  40 | org-agenda-files                      | '("~/org/bzg.org" "~/install/git/Worg/worg-todo.org") |                                    |
  41 | org-agenda-include-diary              | nil                                                | I don't use the diary anymore      |
  42 | org-agenda-remove-tags                | t                                                  | Don't clutter the agenda view      |
  43 | org-agenda-restore-windows-after-quit | t                                                  | I think this should be the default |
  44 | org-agenda-skip-deadline-if-done      | t                                                  |                                    |
  45 | org-agenda-skip-scheduled-if-done     | t                                                  |                                    |
  46 | org-agenda-skip-timestamp-if-done     | t                                                  |                                    |
  47 | org-agenda-sorting-strategy           | '((agenda time-up priority-down category-keep) (todo priority-down category-keep) (tags priority-down category-keep) (search category-keep)) |                                    |
  48 | org-agenda-start-on-weekday           | 1                                                  | Week starts on monday, right?      |
  49 | org-combined-agenda-icalendar-file    | "~/org/org.ics"                                    | I want to use a single file        |
  50 | org-deadline-warning-days             | 7                                                  |                                    |
  51 | org-icalendar-include-todo            | 'all                                               |                                    |
  52 | org-stuck-projects                    | '("+LEVEL=1" ("NEXT" "TODO" "DONE"))               |                                    |
  53 | org-scheduled-past-days               | 100                                                |                                    |
  54 |---------------------------------------+----------------------------------------------------+------------------------------------|
  55
  56 #+BEGIN_SRC emacs-lisp
  57 (setq org-agenda-custom-commands
  58       '(;; Daily agenda view
  59         (" " "Today" agenda "List of tasks for today"
  60          ((org-agenda-ndays 1)
  61           (org-deadline-warning-days 3)
  62           (org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
  63
  64         ;; Everything that has a NEXT keyword
  65         ("," . "NEXT")
  66         (",," tags-todo "Status={Work}/NEXT" nil)
  67         (",!" tags-todo "-Status={Work}/NEXT" nil)
  68         (",+" tags-todo "Status={Leisure}/NEXT" nil)
  69         (",?" tags-todo "Status={GTD}/NEXT" nil)
  70         (",#" tags-todo "Status={WOT}/NEXT" nil)
  71         (",*" todo "NEXT" nil)
  72
  73         ;; Everything that has a TODO keyword
  74         (";" . "TODO")
  75         (";;" tags-todo "Status={Work}/TODO" nil)
  76         (";!" tags-todo "-Status={Work}/TODO" nil)
  77         (";+" tags-todo "Status={Leisure}/TODO" nil)
  78         (";?" tags-todo "Status={GTD}/TODO" nil)
  79         (";#" tags-todo "Status={WOT}/TODO" nil)
  80         (";*" todo "TODO" nil)
  81
  82         ;; Everything that has a NEXT or a TODO keyword
  83         ("." . "NEXT|TODO")
  84         (".." tags-todo "Status={Work}/NEXT|TODO" nil)
  85         (".!" tags-todo "-Status={Work}/NEXT|TODO" nil)
  86         (".+" tags-todo "Status={Leisure}/NEXT|TODO" nil)
  87         (".?" tags-todo "Status={GTD}/NEXT|TODO" nil)
  88         (".#" tags-todo "Status={WOT}/NEXT|TODO" nil)
  89         (".*" todo "NEXT|TODO" nil)
  90
  91         ;; Everything that is in progress
  92         (":" . "In progress")
  93         ("::" tags-todo "+Progress={[0-9]+%}Status={Work}")
  94         (":!" tags-todo "+Progress={[0-9]+%}-Status={Work}")
  95         (":+" tags-todo "+Progress={[0-9]+%}+Status={Leisure}")
  96         (":?" tags-todo "+Progress={[0-9]+%}+Status={GTD}")
  97         (":#" tags-todo "+Progress={[0-9]+%}+Status={WOT}")
  98         (":*" tags-todo "+Progress={[0-9]+%}"
  99          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 100
 101         ;; Everything that has a "Read" tag
 102         ("R" tags-todo "Status={Work}+Read/NEXT" ; shortcut for `C-c a r ,'
 103          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down effort-up))))
 104         ("r" . "Read")
 105         ("rr" tags-todo "Status={Work}+Read/NEXT" nil)
 106         ("r." tags-todo "Read/NEXT|TODO" nil)
 107         ("r," tags-todo "Read/NEXT" nil)
 108         ("r;" tags-todo "Read/TODO" nil)
 109         ("r:" tags "+Progress={[0-9]+%}+Read" nil)
 110         ("r!" tags-todo "-Status={Work}+Read/NEXT" nil)
 111         ("r+" tags-todo "+Status={Leisure}+Read/NEXT" nil)
 112         ("r?" tags-todo "+Status={GTD}+Read/NEXT" nil)
 113         ("r#" tags-todo "+Status={WOT}+Read/NEXT" nil)
 114         ("r*" tags "Read"
 115          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 116 ;;      ("r_" tags "Read+LEVEL<3" nil)
 117         ("rF" tags "+Read+@Offline" nil)
 118         ("r@" tags "+Read+Mail" nil)
 119
 120         ;; Everything that has a "Write" tag
 121         ("W" tags-todo "Status={Work}+Write/NEXT"  ; shortcut for `C-c a w ,'
 122          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down effort-up))))
 123         ("w" . "Write")
 124         ("ww" tags-todo "Status={Work}+Write/NEXT" nil)
 125         ("w." tags-todo "Write/NEXT|TODO" nil)
 126         ("w," tags-todo "Write/NEXT" nil)
 127         ("w;" tags-todo "Write/TODO" nil)
 128         ("w:" tags "+Progress={[0-9]+%}+Write" nil)
 129         ("w!" tags-todo "-Status={Work}+Write/NEXT" nil)
 130         ("w+" tags-todo "+Status={Leisure}+Write/NEXT" nil)
 131         ("w?" tags-todo "+Status={GTD}+Write/NEXT" nil)
 132         ("w#" tags-todo "+Status={WOT}+Write/NEXT" nil)
 133         ("wo" tags "+Write+@Online" nil)
 134         ("w@" tags "+Write+Mail" nil)
 135         ("w*" tags "Write"
 136          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 137
 138         ;; Working on bugs
 139         ("b" . "Bug")
 140         ("bb" tags-todo "+Bug"
 141          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 142         ("b," tags-todo "+Bug/NEXT"
 143          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 144         ("b." tags-todo "+Bug/NEXT|TODO"
 145          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 146         ("b;" tags-todo "+Bug/TODO"
 147          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 148         ("b:" tags-todo "+Bug+Progress={[0-9]+%}"
 149          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 150
 151         ;; Working on code
 152         ("$" . "Code")
 153         ("$$" tags-todo "+Code"
 154          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 155         ("$," tags-todo "+Code/NEXT"
 156          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 157         ("$." tags-todo "+Code/NEXT|TODO"
 158          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 159         ("$;" tags-todo "+Code/TODO"
 160          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 161         ("$:" tags-todo "+Code+Progress={[0-9]+%}"
 162          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 163
 164         ;; Others contexts
 165         ("F" tags "@Offline"
 166          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 167         ("p" tags "Print"
 168          ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 169         ("?" todo "WAITING")
 170         ("D" todo "DELEGATED")
 171         ("v" tags "Watch" ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 172         ("g" tags "Blog" ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 173         ("l" tags "Listen" ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down))))
 174         ("@" tags "Mail" ((org-agenda-sorting-strategy '(time-up todo-state-up priority-down)))) ;; necessary?
 175         ))
 176 #+END_SRC
 177
 178 ** Export variables
 179
 180 | Variable                                | Value       | Why?                      |
 181 |-----------------------------------------+-------------+---------------------------|
 182 | org-export-default-language             | "fr"        | Nobody's perfect          |
 183 | org-export-highlight-first-table-line   | t           |                           |
 184 | org-export-html-extension               | "php"       | I use this for my website |
 185 | org-export-html-style                   | ""          |                           |
 186 | org-export-html-style-default           | ""          |                           |
 187 | org-export-html-with-timestamp          | t           |                           |
 188 | org-export-skip-text-before-1st-heading | nil         |                           |
 189 | org-export-with-LaTeX-fragments         | t           |                           |
 190 | org-export-with-archived-trees          | nil         |                           |
 191 | org-export-with-drawers                 | '("HIDE")   |                           |
 192 | org-export-with-section-numbers         | nil         |                           |
 193 | org-export-with-sub-superscripts        | '{}         |                           |
 194 | org-export-with-tags                    | 'not-in-toc |                           |
 195 | org-export-with-timestamps              | t           |                           |
 196 |-----------------------------------------+-------------+---------------------------|
 197
 198 #+BEGIN_SRC emacs-lisp
 199 (setq org-publish-project-alist
 200       '(
 201         ("homepage"
 202          :base-directory "~/org/homepage/"
 203          :base-extension "org"
 204          :publishing-directory "/home/guerry/public_html/org/homepage/"
 205          :publishing-function org-publish-org-to-html
 206          :section-numbers nil
 207          :table-of-contents nil
 208          :style "<link rel=\"stylesheet\" href=\"u/org.css\" type=\"text/css\" />"
 209          :auto-preamble t
 210          :auto-postamble nil
 211          :xml_declaration "<?php echo '<?xml version=\"1.0\" encoding=\"%s\"?>'; ?>")
 212         ("homepage_articles"
 213          :base-directory "~/org/homepage/articles/"
 214          :base-extension "org"
 215          :publishing-directory "/home/guerry/public_html/org/homepage/articles/"
 216          :publishing-function org-publish-org-to-html
 217          :section-numbers nil
 218          :table-of-contents nil
 219          :style "<link rel=\"stylesheet\" href=\"../u/org.css\" type=\"text/css\" />"
 220          :auto-preamble t
 221          :auto-postamble nil
 222          :xml_declaration "<?php echo '<?xml version=\"1.0\" encoding=\"%s\"?>'; ?>")))
 223 #+END_SRC
 224
 225 ** Tags / TODO / Remember / Logging
 226
 227 | Variable                          | Value   | Why?                           |
 228 |-----------------------------------+---------+--------------------------------|
 229 | org-fast-tag-selection-single-key | 'expert | Good to be an expert somewhere |
 230 | org-tag-alist                           | '(("Read" . ?r) ("Write" . ?w) ("Watch" . ?v) ("Blog" . ?g) ("Listen" . ?l) ("Code" . ?c) ("Bug" . ?b) ("@HOME" . ?H) ("@LAB" . ?L)  ("@Online" . ?O) ("@Offline" . ?F) ("Mail" . ?m) ("Print" . ?p)) |                                                |
 231 | org-tags-column                         | -74                                                |                                                |
 232 | org-tags-match-list-sublevels           | t                                                  |                                                |
 233 | org-todo-keywords                       | '((type "NEXT" "TODO" "WAITING" " " "DONE" "DELEGATED" "CANCELED")) |                                                |
 234 | org-use-fast-todo-selection             | t                                                  |                                                |
 235 | org-use-property-inheritance            | t                                                  |                                                |
 236 | org-use-tag-inheritance                 | t                                                  |                                                |
 237 | org-log-into-drawer                     | t                                                  |                                                |
 238 | org-log-note-headings                   | '((done . "CLOSING NOTE %t") (state . "State %-12s %t") (clock-out . "")) |                                                |
 239 | org-remember-default-headline           | "Notes"                                            |                                                |
 240 | org-remember-store-without-prompt       | t                                                  |                                                |
 241
 242 #+BEGIN_SRC emacs-lisp
 243   (setq org-remember-templates
 244         '(; caps are for projects I'm active on
 245           ("Eyrolles" ?E "* TODO %a\n\n%i%?" "~/org/bzg.org" "Eyrolles" nil)
 246           ("UID" ?U "* TODO %a\n\n%i%?" "~/org/bzg.org" "UID" nil)
 247           ("Webmaster" ?W "* TODO %a\n\n%i%?" "~/org/bzg.org" "Webmaster" nil)
 248           ("OLPC" ?O "* TODO %a\n\n%i%?" "~/org/bzg.org" "OLPC" nil)
 249           ; small letters for other projects:
 250           ("Parkway" ?p "* TODO %a\n\n%i%!" "~/org/bzg.org" "Parkway" nil)
 251           ("Basement" ?b "* TODO %a\n\n%i%?" "~/org/bzg.org" "Basement" nil)
 252           ("Garden" ?g "* TODO %a\n\n%i%?" "~/org/bzg.org" "Garden" nil)
 253           ("Attic" ?a "* TODO %a\n\n%i%?" "~/org/bzg.org" "Attic" nil)
 254           ("Emacs" ?e "* TODO %a\n\n%i%?" "~/org/bzg.org" "Emacs" nil)
 255           ("Infos" ?i "* TODO %a\n\n%i%?%!" "~/org/bzg.org" "Infos" nil)
 256           ("Compas" ?c "* TODO %a\n\n%i%?" "~/org/bzg.org" "Compas" nil)
 257           ("ITIC" ?t "* TODO %a\n\n%i%?" "~/org/bzg.org" "ITIC" nil)
 258           ("WikiProf" ?w "* TODO %a\n\n%i%?" "~/org/bzg.org" "Wikiprof" nil)
 259           ("Org" ?o "* TODO %a\n\n%i%?" "~/org/bzg.org" "Org" nil)))
 260 #+END_SRC
 261
 262 ** Other variables
 263
 264 | Variable                              | Value                                            | Why?                                           |
 265 |---------------------------------------+--------------------------------------------------+------------------------------------------------|
 266 | org-confirm-elisp-link-function       | nil                                              |                                                |
 267 | org-confirm-shell-link-function       | nil                                              |                                                |
 268 | org-context-in-file-links             | t                                                |                                                |
 269 | org-cycle-include-plain-lists         | nil                                              | Avoid confusion. Cycling is just for headlines |
 270 | org-default-notes-file                | "~/org/notes.org"                                | (I don't use this anyway...)                   |
 271 | org-directory                         | "~/org/"                                         |                                                |
 272 | org-drawers                           | '("PROPERTIES" "CLOCK" "HIDE")                   | I just added "HIDE" to the defaults.           |
 273 | org-ellipsis                          | nil                                              |                                                |
 274 | org-email-link-description-format     | "%c: %.50s"                                      | %.50s is a bit too much perhaps                |
 275 | org-fontify-done-headline             | t                                                |                                                |
 276 | org-fontify-emphasized-text           | t                                                |                                                |
 277 | org-footnote-define-inline            | t                                                | I recommend reading more about Org [[http://orgmode.org/manual/Footnotes.html][footnotes]]   |
 278 | org-hide-emphasis-markers             | nil                                              | Keep Org plain text, no WYSIWYG.               |
 279 | org-link-frame-setup                  | '((gnus . gnus) (file . find-file-other-window)) |                                                |
 280 | org-link-mailto-program               | '(browse-url-mail "mailto:%a?subject=%s")        |                                                |
 281 | org-priority-start-cycle-with-default | nil                                              |                                                |
 282 | org-refile-targets                    | '((org-agenda-files . (:maxlevel . 2)))          |                                                |
 283 | org-refile-use-outline-path           | t                                                |                                                |
 284 | org-return-follows-link               | t                                                |                                                |
 285 | org-reverse-note-order                | t                                                |                                                |
 286 | org-show-following-heading            | '((default nil) (occur-tree t))                  |                                                |
 287 | org-show-hierarchy-above              | '((default nil) (occur-tree t))                  |                                                |
 288 | org-show-hierarchy-above              | '((default nil) (tags-tree . t))                 |                                                |
 289 | org-special-ctrl-a/e                  | 'reversed                                        |                                                |
 290 | org-special-ctrl-k                    | t                                                |                                                |
 291 |---------------------------------------+--------------------------------------------------+------------------------------------------------|
 292
 293 #+BEGIN_SRC emacs-lisp
 294 (setq org-link-abbrev-alist
 295       '(("google"   . "http://www.google.com/search?q=%s")
 296         ("googledef" . "http://www.google.fr/search?q=define%3A%s")
 297         ("googlemap" . "http://maps.google.com/maps?f=q&hl=fr&q=%s&ie=UTF8&iwloc=addr&om=1")
 298         ("homepage"  . "http://www.cognition.ens.fr/~guerry/%s.html")
 299         ("delicious" . "http://delicious.com/tag/%s")
 300         ("mydelicious" . "http://delicious.com/bzg/%s")
 301         ("wpfr" . "http://fr.wikipedia.org/wiki/%s")
 302         ("wpen" . "http://en.wikipedia.org/wiki/%s")
 303         ("emacswiki" . "http://www.emacswiki.org/cgi-bin/wiki?search=%s")))
 304 #+END_SRC
 305
 306
 307
 308