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:
parent
81f0b56207
commit
d8aa48f77b
|
@ -1758,7 +1758,7 @@ code ---- the results are extracted in the syntax of the source
|
||||||
;; possibly wrap result
|
;; possibly wrap result
|
||||||
(cond
|
(cond
|
||||||
((assoc :wrap (nth 2 info))
|
((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))))
|
(wrap (concat "#+BEGIN_" name) (concat "#+END_" name))))
|
||||||
((member "html" result-params)
|
((member "html" result-params)
|
||||||
(wrap "#+BEGIN_HTML" "#+END_HTML"))
|
(wrap "#+BEGIN_HTML" "#+END_HTML"))
|
||||||
|
|
Loading…
Reference in New Issue