diff --git a/lisp/langs/org-babel-sh.el b/lisp/langs/org-babel-sh.el index 3b51dddb7..0cb46e234 100644 --- a/lisp/langs/org-babel-sh.el +++ b/lisp/langs/org-babel-sh.el @@ -110,7 +110,7 @@ then create. Return the initialized session." (let* ((session (if session (intern session) :default)) (sh-buffer (org-babel-sh-session-buffer session)) (newp (not (org-babel-comint-buffer-livep sh-buffer)))) - (if (and (get-buffer sh-buffer) (not (buffer-live-p sh-buffer))) + (if (and sh-buffer (get-buffer sh-buffer) (not (buffer-live-p sh-buffer))) (setq sh-buffer nil)) (shell sh-buffer) (when newp diff --git a/org-babel.org b/org-babel.org index 5cc846617..acf5711eb 100644 --- a/org-babel.org +++ b/org-babel.org @@ -2003,14 +2003,12 @@ as.matrix(tab[2,]) As an example eval the following. Adding a line to test -#+srcname: simple-ruby-array -#+begin_src ruby :results silent -[3, 4, 5] -#+end_src +#+tblname: simple-ruby-array +| 3 | 4 | 5 | #+srcname: ruby-array-test #+begin_src ruby :var ar = simple-ruby-array :results silent -ar.first +ar.first.first #+end_src ** DONE space trailing language name @@ -2104,6 +2102,7 @@ of these tests may fail. |-------------------------+----------------------------+-----+-------------+-------------+------| | bugs and tasks | | | | | pass | |-------------------------+----------------------------+-----+-------------+-------------+------| +| | | | | | pass | | simple ruby arrays | ruby-array-test | | 3 | 3 | pass | | R number evaluation | bug-R-number-evaluation | | 2 | 2 | pass | | multi-line ruby blocks | multi-line-ruby-test | | 2 | 2 | pass |