Browse Source

ob-scheme.el: Fix interpreter output sometimes being nil

* lisp/ob-scheme.el (org-babel-scheme-execute-with-geiser):
Fix interpreter output sometimes being nil.

Thanks to Vladimir Nikishkin for reporting this and proposing a
similar fix.
Bastien 5 years ago
parent
commit
e01b335ee3
1 changed files with 2 additions and 1 deletions
  1. 2 1
      lisp/ob-scheme.el

+ 2 - 1
lisp/ob-scheme.el

@@ -177,7 +177,8 @@ is true; otherwise returns the last value."
 		(geiser-debug-show-debug-p nil))
 	    (let ((ret (geiser-eval-region (point-min) (point-max))))
 	      (setq result (if output
-			       (geiser-eval--retort-output ret)
+			       (or (geiser-eval--retort-output ret)
+				   "Geiser Interpreter produced no output")
 			     (geiser-eval--retort-result-str ret "")))))
 	  (when (not repl)
 	    (save-current-buffer (set-buffer repl-buffer)