diff options
author | Eric Schulte <schulte.eric@gmail.com> | 2013-03-29 17:57:06 -0600 |
---|---|---|
committer | Eric Schulte <schulte.eric@gmail.com> | 2013-03-29 17:57:06 -0600 |
commit | 221da3ad27ab20989636c33021f6f89f6799f174 (patch) | |
tree | e4853b46afde0a8d1e2fdcbc1589259c39b23109 | |
parent | d136eb20c7993ca5584f9f72d02eb3a8a3c3b1cc (diff) | |
download | org-mode-221da3ad27ab20989636c33021f6f89f6799f174.tar.gz |
cycle tables for :results org and :results wrap
* lisp/ob-core.el (org-babel-insert-result): Cycle tables for :results
org and :results wrap.
-rw-r--r-- | lisp/ob-core.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/ob-core.el b/lisp/ob-core.el index 4ef2100..723aa9d 100644 --- a/lisp/ob-core.el +++ b/lisp/ob-core.el @@ -2068,6 +2068,7 @@ code ---- the results are extracted in the syntax of the source ((member "latex" result-params) (funcall wrap "#+BEGIN_LaTeX" "#+END_LaTeX")) ((member "org" result-params) + (goto-char beg) (if (org-at-table-p) (org-cycle)) (funcall wrap "#+BEGIN_SRC org" "#+END_SRC")) ((member "code" result-params) (funcall wrap (format "#+BEGIN_SRC %s%s" (or lang "none") results-switches) @@ -2077,6 +2078,7 @@ code ---- the results are extracted in the syntax of the source ((or (member "drawer" result-params) ;; Stay backward compatible with <7.9.2 (member "wrap" result-params)) + (goto-char beg) (if (org-at-table-p) (org-cycle)) (funcall wrap ":RESULTS:" ":END:" 'no-escape)) ((and (not (funcall proper-list-p result)) (not (member "file" result-params))) |