Преглед изворни кода

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 пре 13 година
родитељ
комит
d5e21f43fc
1 измењених фајлова са 2 додато и 2 уклоњено
  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