From 3451d35fcda083cbe8184e55c35e81171bf71deb Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Fri, 27 Jan 2012 16:21:49 -0700 Subject: [PATCH] allow *any* punctuation to proceed an inline src block Thanks to Martyn Jago for this change. * lisp/ob.el (org-babel-get-inline-src-block-matches): Allow *any* punctuation to proceed an inline src block. --- lisp/ob.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/ob.el b/lisp/ob.el index 5cc3cd196..88d92ea1d 100644 --- a/lisp/ob.el +++ b/lisp/ob.el @@ -176,8 +176,8 @@ Returns non-nil if match-data set" (first-line-p (= 1 (line-number-at-pos))) (orig (point))) (let ((search-for (cond ((and src-at-0-p first-line-p "src_")) - (first-line-p "[( \t]src_") - (t "[( \f\t\n\r\v]src_"))) + (first-line-p "[[:punct:] \t]src_") + (t "[[:punct:] \f\t\n\r\v]src_"))) (lower-limit (if first-line-p nil (- (point-at-bol) 1))))