Ensure correct order for empty result wrapping blocks.

* lisp/ob.el (org-babel-insert-result): Ensure correct order for empty
  result wrapping blocks.
This commit is contained in:
Eric Schulte 2012-03-12 08:40:43 -04:00
parent 26e817ac20
commit d5e21f43fc
1 changed files with 2 additions and 2 deletions

View File

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