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
commitfbd809ff8c48f12d1b13caae70810421aaa0aef4 (patch)
treec4b248cfc8ca0e3d8b4cec4ecce1193c504b7611 /elisp/geiser-compile.el
parent31a4bd02c78be39cdd4a58bbc286a57906a525ce (diff)
downloadgeiser-guile-fbd809ff8c48f12d1b13caae70810421aaa0aef4.tar.gz
geiser-guile-fbd809ff8c48f12d1b13caae70810421aaa0aef4.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))