Selaa lähdekoodia

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.
Eric Schulte 14 vuotta sitten
vanhempi
commit
e919c97d7e
1 muutettua tiedostoa jossa 2 lisäystä ja 1 poistoa
  1. 2 1
      lisp/ob.el

+ 2 - 1
lisp/ob.el

@@ -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)))))