Browse Source

Revert "fix compilation errors introduced by most recent changes"

This reverts commit 9ff7f80f51a15c4a3dd2b654f0b08e9e290f5375.
Eric Schulte 13 years ago
parent
commit
b8ae6a6bdb
2 changed files with 9 additions and 11 deletions
  1. 0 1
      lisp/ob-exp.el
  2. 9 10
      lisp/ob.el

+ 0 - 1
lisp/ob-exp.el

@@ -118,7 +118,6 @@ 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

+ 9 - 10
lisp/ob.el

@@ -141,16 +141,15 @@ remove code block execution from the C-c C-c keybinding."
    "\\([^\000]*?\n\\)?[ \t]*#\\+end_src")
   "Regexp used to identify code 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."))
+(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.