From 0d7994f831b111e3919e883998a6e3eb178545e4 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Sat, 5 Jun 2010 23:55:14 +0200
Subject: Racket: providing error contexts

---
 elisp/geiser-debug.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'elisp/geiser-debug.el')

diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el
index fa30506..ad55d0b 100644
--- a/elisp/geiser-debug.el
+++ b/elisp/geiser-debug.el
@@ -67,7 +67,7 @@ non-null value.")
         (erase-buffer)
         (insert what)
         (newline 2)
-        (when res
+        (when (and res (not err))
           (insert res)
           (newline 2))
         (unless (geiser-debug--display-error impl module key output)
-- 
cgit v1.2.3