summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Maus <dmaus@ictsoc.de>2012-02-18 16:41:30 +0100
committerDavid Maus <dmaus@ictsoc.de>2012-02-18 16:41:30 +0100
commitf737fbdc6ed1d45d8629eb1347e8c8d828f77e32 (patch)
tree5457c665b9011389c38b9e26bc83b1845b8e4010
parent05480513573fcd4438748c8d35881eda9deac7ea (diff)
downloadorg-mode-f737fbdc6ed1d45d8629eb1347e8c8d828f77e32.tar.gz
New hook: Run before the finalization process starts
* org-capture.el (org-capture-prepare-finalize-hook): New hook. Run before the finalization process starts. (org-capture-finalize): Run new hook.
-rw-r--r--lisp/org-capture.el9
1 files changed, 9 insertions, 0 deletions
diff --git a/lisp/org-capture.el b/lisp/org-capture.el
index d77415b..e3bd9f7 100644
--- a/lisp/org-capture.el
+++ b/lisp/org-capture.el
@@ -347,6 +347,13 @@ widened to the entire buffer."
:version "24.1"
:type 'hook)
+(defcustom org-capture-prepare-finalize-hook nil
+ "Hook that is run before the finalization starts.
+The capture buffer is current and still narrowed."
+ :group 'org-capture
+ :version "24.1"
+ :type 'hook)
+
;;; The property list for keeping information about the capture process
(defvar org-capture-plist nil
@@ -530,6 +537,8 @@ captured item after finalizing."
(buffer-base-buffer (current-buffer)))
(error "This does not seem to be a capture buffer for Org-mode"))
+ (run-hooks 'org-capture-prepare-finalize-hook)
+
;; Did we start the clock in this capture buffer?
(when (and org-capture-clock-was-started
org-clock-marker (marker-buffer org-clock-marker)