diff options
author | Eric Schulte <schulte.eric@gmail.com> | 2011-07-29 10:36:39 -0600 |
---|---|---|
committer | Eric Schulte <schulte.eric@gmail.com> | 2011-07-29 10:36:39 -0600 |
commit | 9ff7f80f51a15c4a3dd2b654f0b08e9e290f5375 (patch) | |
tree | 1d8d0d0e915ee19d1851fe0f2895d2f902c13a80 | |
parent | 72817926d72cd78efbb114169d61136b8b00c73e (diff) | |
download | org-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.el | 1 | ||||
-rw-r--r-- | lisp/ob.el | 19 |
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 @@ -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. |