fixed insertion of trailing newline after code block evaluation

* lisp/ob.el (org-babel-result-end): No longer leaving trailing new
  line after block removal.
This commit is contained in:
Eric Schulte 2010-12-15 09:58:57 -07:00
parent 8eee473f37
commit e919c97d7e
1 changed files with 2 additions and 1 deletions

View File

@ -1527,7 +1527,8 @@ code ---- the results are extracted in the syntax of the source
(blocks-re (regexp-opt
(list "latex" "html" "example" "src" "result"))))
(if (looking-at (concat "[ \t]*#\\+begin_" blocks-re))
(re-search-forward (concat "[ \t]*#\\+end_" blocks-re) nil t)
(progn (re-search-forward (concat "[ \t]*#\\+end_" blocks-re) nil t)
(forward-char 1))
(while (looking-at "[ \t]*\\(: \\|\\[\\[\\)")
(forward-line 1))))
(point)))))