From 544b1907707f568e4dbd132e635cfce49b4d6ca4 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Mon, 12 Jan 2015 17:53:40 -0800 Subject: [PATCH] org-agenda-done (doesn't work yet) --- dotfiles/emacs.d/init.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el index 21a8aa73..7fc6e75d 100644 --- a/dotfiles/emacs.d/init.el +++ b/dotfiles/emacs.d/init.el @@ -664,6 +664,15 @@ The current directory is assumed to be the project's root otherwise." (defun org-capture-make-linked-todo-template () (org-capture-make-todo-template "%? %A")) + (defun org-agenda-done (&optional arg) + "Mark current TODO as done. +This changes the line at point, all other lines in the agenda referring to +the same tree node, and the headline of the tree node in the Org-mode file." + (interactive "P") + (org-agenda-todo "DONE")) + ;; Override the key definition for org-exit + ;; (define-key org-agenda-mode-map "x" #'org-agenda-done) ;; TODO why does this cause an error + ;; org-mode add-ons (use-package org-present :ensure t) (use-package org-projectile