From db4d645996d1c3da9d50504baa34f3c685cd3b83 Mon Sep 17 00:00:00 2001 From: jao Date: Sat, 8 Oct 2022 20:54:03 +0100 Subject: better display of evaluation results (dups, spurious compile msgs) --- geiser-chez.el | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'geiser-chez.el') diff --git a/geiser-chez.el b/geiser-chez.el index 7f29927..b179ef7 100644 --- a/geiser-chez.el +++ b/geiser-chez.el @@ -204,10 +204,8 @@ This function uses `geiser-chez-init-file' if it exists." "Display an error found during evaluation with the given KEY and message MSG." (when (stringp msg) (save-excursion (insert msg)) - (geiser-edit--buttonize-files)) - (and (not key) - (not (zerop (length msg))) - msg)) + (geiser-edit--buttonize-files) + (not (zerop (length msg))))) ;;; Keywords and syntax: -- cgit v1.2.3