summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Schulte <schulte.eric@gmail.com>2011-07-29 10:36:39 -0600
committerEric Schulte <schulte.eric@gmail.com>2011-07-29 10:36:39 -0600
commit9ff7f80f51a15c4a3dd2b654f0b08e9e290f5375 (patch)
tree1d8d0d0e915ee19d1851fe0f2895d2f902c13a80
parent72817926d72cd78efbb114169d61136b8b00c73e (diff)
downloadorg-mode-9ff7f80f51a15c4a3dd2b654f0b08e9e290f5375.tar.gz
fix compilation errors introduced by most recent changes
* lisp/ob-exp.el (org-babel-inline-src-block-regexp): Declare this variable. * lisp/ob.el (defvar): Wrap variable declaration in eval-when-compile.
-rw-r--r--lisp/ob-exp.el1
-rw-r--r--lisp/ob.el19
2 files changed, 11 insertions, 9 deletions
diff --git a/lisp/ob-exp.el b/lisp/ob-exp.el
index d65441e..9f60b85 100644
--- a/lisp/ob-exp.el
+++ b/lisp/ob-exp.el
@@ -118,6 +118,7 @@ none ----- do not display either code or results upon export"
(nth 1 info)))
(org-babel-exp-do-export info 'block hash)))))
+(defvar org-babel-inline-src-block-regexp)
(defun org-babel-exp-inline-src-blocks (start end)
"Process inline source blocks between START and END for export.
See `org-babel-exp-src-block' for export options, currently the
diff --git a/lisp/ob.el b/lisp/ob.el
index a47b8be..aeddb75 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -141,15 +141,16 @@ remove code block execution from the C-c C-c keybinding."
"\\([^\000]*?\\)[ \t]*#\\+end_src")
"Regexp used to identify code blocks.")
-(defvar org-babel-inline-src-block-regexp
- (concat
- ;; (1) replacement target (2) lang
- "[^-[:alnum:]]\\(src_\\([^ \f\t\n\r\v]+\\)"
- ;; (3,4) (unused, headers)
- "\\(\\|\\[\\(.*?\\)\\]\\)"
- ;; (5) body
- "{\\([^\f\n\r\v]+?\\)}\\)")
- "Regexp used to identify inline src-blocks.")
+(eval-when-compile
+ (defvar org-babel-inline-src-block-regexp
+ (concat
+ ;; (1) replacement target (2) lang
+ "[^-[:alnum:]]\\(src_\\([^ \f\t\n\r\v]+\\)"
+ ;; (3,4) (unused, headers)
+ "\\(\\|\\[\\(.*?\\)\\]\\)"
+ ;; (5) body
+ "{\\([^\f\n\r\v]+?\\)}\\)")
+ "Regexp used to identify inline src-blocks."))
(defun org-babel-get-header (params key &optional others)
"Select only header argument of type KEY from a list.