From: Manuel Hermenegildo <herme@fi.upm.es>
To: Carsten Dominik <dominik@science.uva.nl>
Cc: emacs org-mode mailing list <emacs-orgmode@gnu.org>
Subject: Re: POLL: the 40 variables project
Date: Fri, 30 Jan 2009 17:34:45 +0100 [thread overview]
Message-ID: <18819.11301.765496.876639@clip.dia.fi.upm.es> (raw)
In-Reply-To: <FD50CA36-A385-4C80-8E86-E3BE9F352B0A@uva.nl>
Hi Carsten, we have a general org file that a lot of people in the
organization include. These are the values in it. Cheers --Manuel
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; General emacs things
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq inhibit-splash-screen t)
(global-font-lock-mode 1)
;; Should be done locally instead:
;; (add-hook 'org-mode-hook 'turn-on-font-lock) ; just in case
;; To highlight the line the cursor is at in the agenda
(add-hook 'org-agenda-mode-hook '(lambda () (hl-line-mode 1)))
(setq transient-mark-mode t)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; General org settings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Actually, needs to be done before loading org
(setq org-return-follows-link t) ;; Links followed when typing return
;; The following lines are always needed. You can choose your own keys.
(global-set-key "\C-ca" 'org-agenda)
(global-set-key "\C-cb" 'org-iswitchb)
(global-set-key "\C-ct"
(lambda () (interactive) (find-file org-default-notes-file)))
(global-set-key "\C-cl" 'org-store-link)
(add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
(add-to-list 'auto-mode-alist '("\\.org_archive$" . org-mode))
(add-to-list 'auto-mode-alist '("\\.org.gpg$" . org-mode))
(add-to-list 'auto-mode-alist '("\\.org.gpg_archive$" . org-mode))
(setq org-hide-leading-stars t) ;; Nicer decoration
(setq org-yank-adjusted-subtrees nil) ;; Too smart otherwise (confusing)
(setq org-log-done 'time) ;; Insert time stamp on done
(setq org-agenda-todo-list-sublevels t) ;; Whether to check sublevels
(setq org-tags-match-list-sublevels t) ;; Match tags in sublevels
(setq org-tags-column -77) ;; So that "..." is visible after the tags
;; (setq org-agenda-include-diary t) ;; Connect w/diary - using only org now
;; (setq org-popup-calendar-for-date-prompt nil) ;; was distracting
(setq org-popup-calendar-for-date-prompt t) ;; works better in recent versions
(setq org-startup-folded t) ;; reduces clutter
(setq org-cycle-include-plain-lists nil) ;; Confusing for me...
(setq org-highest-priority ?A)
(setq org-default-priority ?C)
(setq org-lowest-priority ?E)
(setq org-special-ctrl-k t)
(setq org-special-ctrl-a/e t)
(setq org-fontify-done-headline t)
(setq org-fontify-emphasized-text t)
;; (setq org-extend-today-until 6) ;; Does not work yet?
(setq org-ellipsis (quote org-ellipsis))
(setq org-agenda-window-setup
'current-window) ;; normal value: reorganize-frame
;; Default binding of n and p in agenda view is confusing for emacs users
(add-hook
'org-mode-hook
(lambda ()
(define-key org-agenda-keymap "n" 'org-agenda-later)
(define-key org-agenda-mode-map "n" 'org-agenda-later)
(define-key org-agenda-keymap "p" 'org-agenda-earlier)
(define-key org-agenda-mode-map "p" 'org-agenda-earlier)
))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Customize in what order entries are sorted (important for todo
;; lists). Default is first by category -> changed to first by priority.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq org-agenda-sorting-strategy
'((agenda time-up priority-down category-keep)
(todo time-up priority-down category-keep)
(tags time-up priority-down category-keep)
(search category-keep)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Archiving (used to hide done or dismissed/canceled tasks from agenda)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq org-archive-location "::* Archive")
(setq org-agenda-todo-ignore-scheduled t) ;; reduces clutter
(setq org-agenda-todo-ignore-deadlines t) ;; reduces clutter
(setq org-agenda-todo-ignore-with-date t) ;; reduces clutter
(setq org-agenda-show-log nil) ; By default do not show closed tasks
(defun org-agenda-my-archive ()
(interactive)
(if org-agenda-archives-mode
(message "Archiving not allowed in archives mode.")
(org-agenda-archive-to-archive-sibling))
)
(add-hook
'org-mode-hook
(lambda ()
(define-key org-agenda-keymap "$" 'org-agenda-my-archive)
(define-key org-agenda-mode-map "$" 'org-agenda-my-archive)
))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; With this typing "L" in agenda and todo buffers allows toggling
;; whether category/file names appear or not at the left or entries in
;; agenda/todo listings.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(defvar my-org-agenda-list-category t)
(defun my-org-agenda-toggle-list-category ()
"Toggles whether category/file name appears or not at the left
of entries in agenda listings. Useful to unclutter listings."
(interactive)
(if my-org-agenda-list-category
(progn
(setq my-org-agenda-list-category nil)
(setq org-agenda-prefix-format
'((agenda . " %-12:c%?-12t% s")
(timeline . " % s")
(todo . " %-12:c")
(tags . " %-12:c")
(search . " %-12:c")))
)
(setq my-org-agenda-list-category t)
(setq org-agenda-prefix-format
'((agenda . " %?-12t% s")
(timeline . " % s")
(todo . " ")
(tags . " ")
(search . " ")))
)
(org-agenda-redo))
(my-org-agenda-toggle-list-category)
(add-hook
'org-mode-hook
(lambda ()
(define-key org-agenda-keymap "L" 'my-org-agenda-toggle-list-category)
(define-key org-agenda-mode-map "L" 'my-org-agenda-toggle-list-category)
))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq Info-default-directory-list
(cons (expand-file-name
(concat org-general-path "org/doc"))
Info-default-directory-list))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Connection w/remember: allows adding quickly entries in agenda.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(org-remember-insinuate)
;; (setq org-directory "~/path/to/my/orgfiles/")
(setq org-default-notes-file (car org-agenda-files))
(define-key global-map "\C-cr" 'org-remember)
(setq org-remember-templates
'(("Todo" ?t "** TODO [#C] %? %t \n %i\n %a" "" "Unclassified")
("Appointments" ?a "** %^t %?\n %a" "" "Unclassified")
("Idea" ?i "* %^{Title}\n %a" "" "Raw New Ideas")
("Journal Entry" ?j "* %U %?\n\n %i\n %a" "" "Journal Notes")
))
--
-------------------------------------------------------------------------------
Manuel Hermenegildo | Prof., C.S.Dept., T.U. Madrid (UPM)
Director, IMDEA-Software and CLIP Group | +34-91-336-7435 (W) -352-4819 (Fax)
-------------------------------------------------------------------------------
next prev parent reply other threads:[~2009-01-31 11:04 UTC|newest]
Thread overview: 70+ messages / expand[flat|nested] mbox.gz Atom feed top
2009-01-29 8:49 POLL: the 40 variables project Carsten Dominik
2009-01-29 11:13 ` Friedrich Delgado Friedrichs
2009-01-29 13:02 ` Carsten Dominik
2009-01-29 13:40 ` Dan Griswold
2009-01-29 11:46 ` Womick, Don
2009-01-29 11:59 ` Tassilo Horn
2009-01-29 13:37 ` Sebastian Rose
2009-01-29 13:30 ` Bernt Hansen
2009-01-29 13:46 ` Chris Leyon
2009-01-29 14:10 ` Matthew Lundin
2009-01-29 14:49 ` Bernt Hansen
2009-01-29 14:55 ` srandby
2009-01-29 16:01 ` Eric S Fraga
2009-01-29 16:40 ` Dan Davison
2009-01-29 16:40 ` Michael Ekstrand
2009-01-29 17:24 ` Sivaram Neelakantan
2009-01-29 17:56 ` Manish
2009-01-29 21:02 ` Dan Davison
2009-01-29 23:07 ` Carsten Dominik
2009-01-30 7:46 ` Manish
2009-01-30 8:18 ` Carsten Dominik
2009-01-30 8:29 ` Manish
2009-01-30 8:38 ` Carsten Dominik
2009-01-30 8:52 ` Manish
2009-01-30 9:16 ` Carsten Dominik
2009-01-30 10:35 ` Scot Becker
[not found] ` <e7cdbe30902011255y680747e8vb8731a775a73dc73@mail.gmail.com>
2009-02-01 22:15 ` Carsten Dominik
2009-02-02 10:36 ` Carsten Dominik
[not found] ` <87ljstx71e.fsf@gollum.intra.norang.ca>
2009-01-30 13:50 ` Carsten Dominik
2009-01-30 15:27 ` Carsten Dominik
2009-01-29 18:02 ` William Henney
2009-01-29 19:07 ` Peter Jones
2009-01-29 19:44 ` Hsiu-Khuern Tang
2009-01-29 22:06 ` Steven E. Harris
2009-01-29 22:43 ` Oliver Charles
2009-01-30 3:32 ` Ross Patterson
2009-01-30 12:13 ` Sebastian Rose
2009-01-30 3:44 ` Dennis Groves
2009-01-30 4:12 ` Manish
2009-01-30 4:46 ` Austin Frank
2009-01-30 8:17 ` Ulf Stegemann
2009-01-30 12:26 ` Sebastian Rose
2009-01-30 8:26 ` Cameron Horsburgh
2009-01-30 8:43 ` R: " Giovanni Ridolfi
2009-01-30 9:21 ` Manish
2009-01-30 11:09 ` Shaun Johnson
2009-01-30 12:08 ` Rainer Stengele
2009-01-30 12:48 ` Mikael Fornius
2009-01-30 15:56 ` William Henney
2009-01-30 16:12 ` Christian Egli
2009-01-30 16:34 ` Manuel Hermenegildo [this message]
2009-02-01 0:34 ` Samuel Wales
2009-01-30 16:36 ` Eric Schulte
2009-01-31 13:06 ` Martin Stemplinger
2009-02-01 15:18 ` James TD Smith
2009-02-04 15:29 ` Charles Sebold
2009-02-05 14:55 ` Manish
2009-02-04 21:28 ` Mike Newman
2014-01-17 20:55 ` [Orgmode] " Manish
2014-01-19 15:54 ` Bastien
2014-01-20 2:18 ` M
2014-01-20 11:17 ` Bastien
2014-01-20 11:38 ` Rainer M Krug
2014-01-20 11:47 ` Bastien
2014-01-20 17:07 ` Eric S Fraga
2014-01-20 7:05 ` henry atting
2014-01-20 11:16 ` Bastien
2014-04-30 15:29 ` Sungmin
2014-04-30 15:50 ` Eric S Fraga
[not found] <20090130091800.B54F32868C@mailhost.cs.tu-berlin.de>
2009-01-30 11:33 ` Stephan Schmitt
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=18819.11301.765496.876639@clip.dia.fi.upm.es \
--to=herme@fi.upm.es \
--cc=dominik@science.uva.nl \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.