diff options
author | Eric Schulte <eric.schulte@gmx.com> | 2012-01-27 16:21:49 -0700 |
---|---|---|
committer | Eric Schulte <eric.schulte@gmx.com> | 2012-01-27 16:21:49 -0700 |
commit | 3451d35fcda083cbe8184e55c35e81171bf71deb (patch) | |
tree | 01ec36267cef58348022211d1c45a614fb034c25 | |
parent | 8c69417861c78965ccb3af387ddcb74c886ef543 (diff) | |
download | org-mode-3451d35fcda083cbe8184e55c35e81171bf71deb.tar.gz |
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.
-rw-r--r-- | lisp/ob.el | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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)))) |