Explorar o código

litorgy-execute-src-block will again stifle results when called with truthy ARG value

Eric Schulte %!s(int64=16) %!d(string=hai) anos
pai
achega
73163718ca
Modificáronse 1 ficheiros con 3 adicións e 1 borrados
  1. 3 1
      litorgy/litorgy.el

+ 3 - 1
litorgy/litorgy.el

@@ -120,7 +120,9 @@ the header arguments specified at the source code block."
     (unless (member lang litorgy-interpreters)
       (error "Language is not in `litorgy-interpreters': %s" lang))
     (setq result (funcall cmd body params))
-    (litorgy-insert-result result (cdr (assoc :results params)))
+    (if arg
+        (message (format "%S" result))
+      (litorgy-insert-result result (cdr (assoc :results params))))
     result))
 
 (defun litorgy-eval-buffer (&optional arg)