diff options
| author | Eli Zaretskii | 2017-09-29 13:24:05 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2017-09-29 13:24:05 +0300 |
| commit | 33401b26b1aecf61adfd77fa7c4e29913c0bb3d7 (patch) | |
| tree | 0238b3a9e51c4a37f8fe35feb11a66baeb2d1f3d /lisp/org/ob-R.el | |
| parent | c1ac8c170f17a98b7e5d6e098f707daeb71ea27d (diff) | |
| parent | d4b2bbdc73ace5cb0971a32a75941486489d1cc5 (diff) | |
| download | emacs-33401b26b1aecf61adfd77fa7c4e29913c0bb3d7.tar.gz emacs-33401b26b1aecf61adfd77fa7c4e29913c0bb3d7.zip | |
Merge branch 'emacs-26' of git.savannah.gnu.org:/srv/git/emacs into emacs-26
Diffstat (limited to 'lisp/org/ob-R.el')
| -rw-r--r-- | lisp/org/ob-R.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org/ob-R.el b/lisp/org/ob-R.el index ded825b1d01..6781fb30a3b 100644 --- a/lisp/org/ob-R.el +++ b/lisp/org/ob-R.el | |||
| @@ -159,10 +159,10 @@ This function is called by `org-babel-execute-src-block'." | |||
| 159 | (result-type (cdr (assq :result-type params))) | 159 | (result-type (cdr (assq :result-type params))) |
| 160 | (session (org-babel-R-initiate-session | 160 | (session (org-babel-R-initiate-session |
| 161 | (cdr (assq :session params)) params)) | 161 | (cdr (assq :session params)) params)) |
| 162 | (colnames-p (cdr (assq :colnames params))) | ||
| 163 | (rownames-p (cdr (assq :rownames params))) | ||
| 164 | (graphics-file (and (member "graphics" (assq :result-params params)) | 162 | (graphics-file (and (member "graphics" (assq :result-params params)) |
| 165 | (org-babel-graphical-output-file params))) | 163 | (org-babel-graphical-output-file params))) |
| 164 | (colnames-p (unless graphics-file (cdr (assq :colnames params)))) | ||
| 165 | (rownames-p (unless graphics-file (cdr (assq :rownames params)))) | ||
| 166 | (full-body | 166 | (full-body |
| 167 | (let ((inside | 167 | (let ((inside |
| 168 | (list (org-babel-expand-body:R body params graphics-file)))) | 168 | (list (org-babel-expand-body:R body params graphics-file)))) |