mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-23 07:18:53 +00:00
Code

babel: New hook org-babel-after-execute-hook

Browse Source 
Runs at the end of org-babel-execute-src-block
This commit is contained in:
Dan Davison 2010-03-13 12:34:02 -05:00
parent a9a8cbe39b
commit 215d11c092
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
contrib/babel/lisp/org-babel.el
View File

@ -124,6 +124,8 @@ can not be resolved.")
(defvar org-babel-hash-show 4
"Number of initial characters to show of a hidden results hash.")
(defvar org-babel-after-execute-hook nil
"Hook for functions to be called after `org-babel-execute-src-block'")
(defun org-babel-named-src-block-regexp-for-name (name)
"Regexp used to match named src block."
(concat org-babel-source-name-regexp (regexp-quote name) "[ \t\n]*"
@ -240,6 +242,7 @@ block."
(list (list result))
result)))
(org-babel-insert-result result result-params info new-hash)
(run-hooks 'org-babel-after-execute-hook)
result))))
(defun org-babel-load-in-session (&optional arg info)