summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAllen S. Rout <asr@ufl.edu>2010-11-18 22:32:53 +0000
committerCarsten Dominik <carsten.dominik@gmail.com>2010-11-27 07:55:21 +0100
commitf8e611913144830cb60a2af545a9b7f1515fc7fd (patch)
tree5605edb7323884967a8d6d0a2fc0ec596163a144
parent6e98e5dd0fd995d4e4bde78581fb711fab35b5e7 (diff)
downloadorg-mode-f8e611913144830cb60a2af545a9b7f1515fc7fd.tar.gz
New hook to run after finalizing capture, suitable for deleting a frame
* lisp/org-capture.el (org-capture-after-finalize-hook): New hook. (org-capture-finalize): Run the new hook. TINYCHANGE
-rw-r--r--lisp/org-capture.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index c707e9c..a5c6a4d 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -319,6 +319,12 @@ The remember buffer is still current when this hook runs."
:group 'org-capture
:type 'hook)
+(defcustom org-capture-after-finalize-hook nil
+ "Hook that is run right after a capture process is finalized.
+ Suitable for window cleanup"
+ :group 'org-capture
+ :type 'hook)
+
;;; The property list for keeping information about the capture process
(defvar org-capture-plist nil
@@ -554,6 +560,8 @@ bypassed."
;; Restore the window configuration before capture
(set-window-configuration return-wconf))
+
+ (run-hooks 'org-capture-after-finalize-hook)
(when abort-note
(cond
((equal abort-note 'clean)