-;; Time-stamp: <2014-06-18 16:47:25 kmodi>
+;; Time-stamp: <2014-06-19 09:45:01 kmodi>
 
 ;; Org Mode
 

  (org-agenda-todo "DONE")
  (org-agenda-switch-to)
  (org-capture 0 "t"))
;; Override the key definition
(define-key org-agenda-mode-map "X" 'sacha/org-agenda-mark-done-and-add-followup)

(defun sacha/org-agenda-new ()
  "Create a new note or task at the current agenda item.

  (interactive)
  (org-agenda-switch-to)
  (org-capture 0))

(add-hook 'org-agenda-mode-hook
          (lambda ()
            ;; Override the key definition for org-exit
            (define-key org-agenda-mode-map "x" 'sacha/org-agenda-done)
            (define-key org-agenda-mode-map "X" 'sacha/org-agenda-mark-done-and-add-followup)
            ;; New key assignment
            (define-key org-agenda-mode-map "N" 'sacha/org-agenda-new)))


(setq setup-org-loaded t)
