Parcourir la source

Ensure correct order for empty result wrapping blocks.

* lisp/ob.el (org-babel-insert-result): Ensure correct order for empty
  result wrapping blocks.
Eric Schulte il y a 13 ans
Parent
commit
d5e21f43fc
1 fichiers modifiés avec 2 ajouts et 2 suppressions
  1. 2 2
      lisp/ob.el

+ 2 - 2
lisp/ob.el

@@ -1835,9 +1835,9 @@ code ---- the results are extracted in the syntax of the source
 	(setq results-switches
 	      (if results-switches (concat " " results-switches) ""))
 	(flet ((wrap (start finish)
-		     (goto-char beg) (insert (concat start "\n"))
 		     (goto-char end) (insert (concat finish "\n"))
-		     (setq end (point-marker)))
+		     (goto-char beg) (insert (concat start "\n"))
+		     (goto-char end) (setq end (point-marker)))
 	       (proper-list-p (it) (and (listp it) (null (cdr (last it))))))
 	  ;; insert results based on type
 	  (cond