0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-20 20:18:41 +00:00

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

This commit is contained in:
Eric Schulte 2009-05-14 06:39:20 -07:00
parent 48752e7d79
commit 6940577d8e
2 changed files with 9 additions and 4 deletions

View file

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

View file

@ -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]]. example in the [[* emacs lisp source reference][emacs lisp source reference]].
* Bugs [2/4] * Bugs [3/4]
** TODO space trailing language name
fix regexp so it works when there's a space trailing the language name
** TODO extra quotes for nested string ** TODO extra quotes for nested string
when string are 2 deep in org-mode tables their quotes aren't being when string are 2 deep in org-mode tables their quotes aren't being
@ -346,6 +344,13 @@ ls
#+begin_src ruby #+begin_src ruby
puts %w(eric michael schulte) puts %w(eric michael schulte)
#+end_src #+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 ** RESOLVED Args out of range error