capitalize RESULTS in :wrap'd code block results

* lisp/ob.el (org-babel-insert-result): Capitalize RESULTS in :wrap'd
  code block results.
This commit is contained in:
Eric Schulte 2012-01-11 19:43:00 -07:00
parent 81f0b56207
commit d8aa48f77b
1 changed files with 1 additions and 1 deletions

View File

@ -1758,7 +1758,7 @@ code ---- the results are extracted in the syntax of the source
;; possibly wrap result
(cond
((assoc :wrap (nth 2 info))
(let ((name (or (cdr (assoc :wrap (nth 2 info))) "results")))
(let ((name (or (cdr (assoc :wrap (nth 2 info))) "RESULTS")))
(wrap (concat "#+BEGIN_" name) (concat "#+END_" name))))
((member "html" result-params)
(wrap "#+BEGIN_HTML" "#+END_HTML"))