From ecf5368afe7ae32b5016d1779bdcde6fbea2cd39 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Sat, 22 Oct 2011 15:28:01 +0200 Subject: [PATCH] ob.el: Fix byte-compiler warning about free variable. --- lisp/ob.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/ob.el b/lisp/ob.el index a5103b287..4438ee85f 100644 --- a/lisp/ob.el +++ b/lisp/ob.el @@ -181,10 +181,10 @@ Returns non-nil if match-data set" (when (looking-at org-babel-inline-src-block-regexp) t )))))) +(defvar org-babel-inline-lob-one-liner-regexp) (defun org-babel-get-lob-one-liner-matches() "Set match data if on line of an lob one liner. Returns non-nil if match-data set" - (save-excursion (unless (= (point) (point-at-bol)) ;; move before inline block (re-search-backward "[ \f\t\n\r\v]" nil t)) @@ -1490,7 +1490,6 @@ region is not active then the point is demarcated." (goto-char start) (move-end-of-line 1))))) (defvar org-babel-lob-one-liner-regexp) -(defvar org-babel-inline-lob-one-liner-regexp) (defun org-babel-where-is-src-block-result (&optional insert info hash indent) "Find where the current source block results begin. Return the point at the beginning of the result of the current -- 2.11.4.GIT