org-mode ob-eval org-babel-eval-error-notify fix

display message only if error is not 0.
would be nice to have a toggle variable for that.

Signed-off-by: Andreas Gerler <baronNOSPAMbundesbrandschatzamt.de>

diff --git a/elpa/org-9.6/ob-eval.el b/elpa/org-9.6/ob-eval.el
index f57566079d729069996bd2da23d3978171d63bfd..b379264e1489e24a0510ee0d0539d6d5f385a1aa 100644 (file)
--- a/elpa/org-9.6/ob-eval.el
+++ b/elpa/org-9.6/ob-eval.el
@@ -38,14 +38,15 @@
 
 (defun org-babel-eval-error-notify (exit-code stderr)
   "Open a buffer to display STDERR and a message with the value of EXIT-CODE."
-  (let ((buf (get-buffer-create org-babel-error-buffer-name)))
+  (if (> exit-code 0)
+      (let ((buf (get-buffer-create org-babel-error-buffer-name)))
     (with-current-buffer buf
       (goto-char (point-max))
       (save-excursion
         (unless (bolp) (insert "\n"))
         (insert stderr)
         (insert (format "[ Babel evaluation exited with code %S ]" exit-code))))
-    (display-buffer buf))
+    (display-buffer buf)))
   (message "Babel evaluation exited with code %S" exit-code))
 
 (defun org-babel-eval (command query)