my latest capture setup for emacs orgmode

emacs_orgmode_capture

;; Settings from March 5 2011 onwards: 

;; TODO states and keys: 

(setq org-todo-keywords
      '(
	(sequence "TODO(t)" "|" "DONE(d)" "CANCELLED(c)")
;;	(sequence "TODO(t)" "STARTED(s)" "WAITING(w)" "APPT(a)" "EVT(e)" "TRAVEL(v)" "CLASS(c)" 
;;		  "|" "DONE(D)" "CANCELLED(C)" "DEFERRED(F)")
;;	(sequence "DELEGATED(l)" "FOLLOWUP(p)")
;;	(sequence "REPORT(r)" "BUG(b)" "KNOWNCAUSE(k)" "|" "FIXED(f)")
;;	(sequence "|" "CANCELED(c)")
))

;; Globally persistent tags (in addition to those found in file: 

;; we want to use these for filtering the agenda, especially when printing year or month agendas
;; therefore we add the .deadline tag (DEADLINE property does not count as tag and would be filtered away)
;; These are inherited in capture mode
(setq org-tag-alist '((".appt" . ?a) (".evt" . ?e) (".class" . ?c) (".trip" . ?t) (".deadline" . ?d)))

;; the org-tag-persistent-alist is *NOT* inherited in capture mode entry!
;; (setq org-tag-persistent-alist '((".appt" . ?a) (".evt" . ?e) (".class" . ?c) (".trip" . ?t) (".deadline" . ?d)))

(global-set-key [f2] 'open-log)
(global-set-key [C-f2] 'org-publish-project) ;; to be transferred to epxort_setup.el
(global-set-key [S-f2] 'dired-capture-folder) ;; obsolete?
(global-set-key [C-f12] 'dired-capture-folder) ;; because I may use it quite a lot
(global-set-key [f3] 'org-capture)

(global-set-key [f4] 'capture-date-interactively) 
(global-set-key [S-f4] 'capture-date-automatically) 
(global-set-key [f5] 'org-capture)  
(global-set-key [f6] 'org-capture-refile)
(global-set-key [S-f6] 'org-capture-with-copy-ambiant)
(global-set-key [f7] 'edit-emacs-startup-file)

(defun org-capture-with-copy-ambiant ()
  "refile a subtree in two different locations. requires set-tags-user"
  (interactive)
  (org-copy-subtree)
  (org-capture-finalize)
  (find-file "~/Dropbox/AMBIANT/log/ambiant_global_log.org")
  (end-of-buffer)
  (org-paste-subtree)
  (set-tags-user)
  (save-buffer)
  (kill-this-buffer))

(defun refile-and-keep ()
  "refile a subtree and keep the original by yanking it back"
  (interactive)
  (org-copy-subtree)
  (org-refile)
  (org-paste-subtree)
;;  (switch-to-buffer nil)
  )

(global-set-key (kbd "C-c r") 'refile-and-keep)

(custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
 '(org-agenda-files (quote 
		     (
;; Following are filed by heading
		      "~/Dropbox/notes/capturefiles/notes.org" 
		      "~/Dropbox/notes/capturefiles/ptychiakes.org"
		      "~/Dropbox/notes/capturefiles/projects.org"
		      "~/Dropbox/notes/capturefiles/tasks.org" 
		      "~/Dropbox/notes/capturefiles/classes.org"
		      "~/Dropbox/notes/capturefiles/phd.org"
		      "~/Dropbox/notes/capturefiles/ambiant.org" 
;; Following are filed chronologically in date-tree
		      "~/Dropbox/notes/capturefiles/log.org"
		      "~/Dropbox/notes/capturefiles/ideas.org"
		      "~/Dropbox/notes/capturefiles/finance.org"
;; This is a file for tests. Kept here for fast access with C-u C-c C-w
		      "~/tmp/org_tests.org"
		      "~/Dropbox/Persons+Projects/AB-IZ/note_exchange.org"
		      ))))

(setq org-refile-targets
      '(
       ("~/Dropbox/notes/capturefiles/notes.org" . (:maxlevel . 8))
       ("~/Dropbox/notes/capturefiles/finance.org" . (:maxlevel . 5))
       ("~/Dropbox/notes/capturefiles/tasks.org" . (:maxlevel . 7))
       ("~/Dropbox/notes/capturefiles/classes.org" . (:maxlevel . 1))
       ("~/Dropbox/notes/capturefiles/phd.org" . (:maxlevel . 1))
       ("~/Dropbox/notes/capturefiles/ptychiakes.org" . (:maxlevel . 1))
       ("~/Dropbox/notes/capturefiles/projects.org" . (:maxlevel . 3))
       ("~/Dropbox/notes/capturefiles/ambiant.org" . (:maxlevel . 2))
       ("~/Dropbox/Persons+Projects/AB-IZ/note_exchange.org" . (:maxlevel . 1))
;;       ("~/Dropbox/notes/capturefiles/timesheets.org" . (:maxlevel . 1))
;; This is a file for tests. Kept here for fast access with C-u C-c C-w
       ("~/tmp/org_tests.org" . (:maxlevel . 8))
       ))

;; (setq org-default-notes-file "timesheets.org")
(define-key global-map "\C-cc" 'org-capture)

(setq org-capture-templates
      '(
	("b" "Bezas (logged message to)" entry (file "~/Dropbox/Persons+Projects/AB-IZ/note_exchange.org")
             "* %?%^g\n Entered on %T %i\n")
	("n" "Notes" entry (file "~/Dropbox/notes/capturefiles/notes.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
        ("i" "Ideas" entry (file "~/Dropbox/notes/capturefiles/ideas.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("c" "Classes" entry (file "~/Dropbox/notes/capturefiles/classes.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("d" "Diploma Theses" entry (file "~/Dropbox/notes/capturefiles/ptychiakes.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("s" "SC log" entry (file+datetree "~/Library/Application Support/SuperCollider/sclog.org")
             "* %?%^g\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("t" "Todo" entry (file "~/Dropbox/notes/capturefiles/tasks.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("h" "PhD" entry (file "~/Dropbox/notes/capturefiles/phd.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("p" "Projects" entry (file "~/Dropbox/notes/capturefiles/projects.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("a" "AMBIANT thematic/project" entry (file "~/Dropbox/notes/capturefiles/ambiant.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("A" "AMBIANT date/log" entry (file+datetree "~/Dropbox/notes/capturefiles/ambiant.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	("f" "Finance (date)" entry (file+datetree "~/Dropbox/notes/capturefiles/finance.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
        ("l" "log (Global-General) " entry (file+datetree "~/Dropbox/notes/capturefiles/log.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
        ("L" "log (Global-General) date prompt" entry (file+datetree+prompt "~/Dropbox/notes/capturefiles/log.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
        ("r" "rem (date prompt)" entry (file+datetree+prompt "/Volumes/log/rem.org")
             "* %?%^G\n  :PROPERTIES:\n  :ENTERED_ON: %T\n  :END:\n%i\n")
	)
      )