浏览代码

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

Eric Schulte 16 年之前
父节点
当前提交
73163718ca
共有 1 个文件被更改,包括 3 次插入1 次删除
  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)