diff --git a/haskell-load.el b/haskell-load.el
index ec643935b..9de12cb1f 100644
--- a/haskell-load.el
+++ b/haskell-load.el
@@ -123,7 +123,7 @@ actual Emacs buffer of the module being loaded."
         (haskell-mode-message-line (if reload "Reloaded OK." "OK."))
       (haskell-interactive-mode-compile-error session "Compilation failed."))
     (when cont
-      (condition-case e
+      (condition-case-unless-debug e
           (funcall cont ok)
         (error (message "%S" e))
         (quit nil)))))
diff --git a/haskell-process.el b/haskell-process.el
index 5d33e18a5..51eea683d 100644
--- a/haskell-process.el
+++ b/haskell-process.el
@@ -485,7 +485,7 @@ function and remove this comment.
   "Call the command's complete function."
   (let ((comp-func (haskell-command-complete command)))
     (when comp-func
-      (condition-case e
+      (condition-case-unless-debug e
           (funcall comp-func
                    (haskell-command-state command)
                    response)