Browse Source

litorgy-src-block-regexp is now robust to trailing spaces after source name

Eric Schulte 16 years ago
parent
commit
6940577d8e
2 changed files with 9 additions and 4 deletions
  1. 1 1
      litorgy/litorgy.el
  2. 8 3
      rorg.org

+ 1 - 1
litorgy/litorgy.el

@@ -53,7 +53,7 @@ then run `litorgy-execute-src-block'."
   (setq litorgy-src-block-regexp
 	(concat "#\\+begin_src \\("
 		(mapconcat 'regexp-quote value "\\|")
-		"\\)"
+		"\\)[ \t]*"
                 "\\([ \t]+\\([^\n]+\\)\\)?\n" ;; match header arguments
                 "\\([^\000]+?\\)#\\+end_src"))
   (setq litorgy-inline-src-block-regexp

+ 8 - 3
rorg.org

@@ -312,9 +312,7 @@ This is currently working only with emacs lisp as in the following
 example in the [[* emacs lisp source reference][emacs lisp source reference]].
 
 
-* Bugs [2/4]
-** TODO space trailing language name
-fix regexp so it works when there's a space trailing the language name
+* Bugs [3/4]
 
 ** TODO extra quotes for nested string
 when string are 2 deep in org-mode tables their quotes aren't being
@@ -346,6 +344,13 @@ ls
 #+begin_src ruby
 puts %w(eric michael schulte)
 #+end_src
+** RESOLVED space trailing language name
+fix regexp so it works when there's a space trailing the language name
+
+#+srcname: test-trailing-space
+#+begin_src ruby 
+:schulte
+#+end_src
 
 ** RESOLVED Args out of range error