summaryrefslogtreecommitdiff
path: root/elisp/geiser-compile.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2009-04-28 00:50:18 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2009-04-28 00:50:18 +0200
commit5ff75890a9b1dbbba5b6a76fd770cb4d2ff72fcc (patch)
tree582876204df8b9273e397bfe62cdc8ae3bae899e /elisp/geiser-compile.el
parent11ed530d2fdf41ab91bf2166bb443ff89785576d (diff)
downloadgeiser-5ff75890a9b1dbbba5b6a76fd770cb4d2ff72fcc.tar.gz
geiser-5ff75890a9b1dbbba5b6a76fd770cb4d2ff72fcc.tar.bz2
Fixes for eval/compilation error display.
Diffstat (limited to 'elisp/geiser-compile.el')
-rw-r--r--elisp/geiser-compile.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/elisp/geiser-compile.el b/elisp/geiser-compile.el
index 8b4a4db..4e9e8cb 100644
--- a/elisp/geiser-compile.el
+++ b/elisp/geiser-compile.el
@@ -41,9 +41,9 @@
(defun geiser-compile--display-result (title ret)
(if (not (geiser-eval--retort-error ret))
- (message "%s %s" title (or (geiser-eval--retort-result ret) "OK!"))
- (message "")
- (geiser-debug--display-retort title ret)))
+ (message "%s %s" title (or (geiser-eval--retort-result ret) "done."))
+ (message ""))
+ (geiser-debug--display-retort title ret))
(defun geiser-compile--file-op (path compile-p msg)
(let* ((b/p (geiser-compile--buffer/path path))