diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-06-17 14:17:23 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-06-17 14:17:23 +0200 |
commit | f195259821bb8fbe1bfefbcc131ac10fab6c927b (patch) | |
tree | f19786852a3c309052a1e891313330247dc0af34 | |
parent | 61a0fafb440f0cbf8a1e4b8b24d1b5d3174253e7 (diff) | |
parent | 0279d84cd7f857535342b4ec3c2e70ac76c1ee27 (diff) | |
download | org-mode-f195259821bb8fbe1bfefbcc131ac10fab6c927b.tar.gz |
Merge branch 'maint'
-rw-r--r-- | lisp/ob-exp.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/ob-exp.el b/lisp/ob-exp.el index 6a0c554..769b7f0 100644 --- a/lisp/ob-exp.el +++ b/lisp/ob-exp.el @@ -32,13 +32,9 @@ (declare-function org-babel-lob-get-info "ob-lob" (&optional datum)) (declare-function org-babel-eval-wipe-error-buffer "ob-eval" ()) -(declare-function org-between-regexps-p "org" - (start-re end-re &optional lim-up lim-down)) (declare-function org-get-indentation "org" (&optional line)) (declare-function org-heading-components "org" ()) (declare-function org-in-commented-heading-p "org" (&optional no-inheritance)) -(declare-function org-in-block-p "org" (names)) -(declare-function org-in-verbatim-emphasis "org" ()) (declare-function org-link-search "org" (s &optional avoid-pos stealth)) (declare-function org-fill-template "org" (template alist)) (declare-function org-split-string "org" (string &optional separators)) @@ -47,7 +43,6 @@ (declare-function org-element-property "org-element" (property element)) (declare-function org-element-type "org-element" (element)) (declare-function org-id-get "org-id" (&optional pom create prefix)) -(declare-function org-escape-code-in-string "org-src" (s)) (defcustom org-export-babel-evaluate t "Switch controlling code evaluation during export. @@ -352,7 +347,7 @@ replaced with its value." org-babel-exp-inline-code-template org-babel-exp-code-template) `(("lang" . ,(nth 0 info)) - ("body" . ,(org-escape-code-in-string (nth 1 info))) + ("body" . ,(nth 1 info)) ("switches" . ,(let ((f (nth 3 info))) (and (org-string-nw-p f) (concat " " f)))) ("flags" . ,(let ((f (assq :flags (nth 2 info)))) |