From 2bdfa6e9cfe7e6cec51c8f7fcf65eab576a254f5 Mon Sep 17 00:00:00 2001 From: Mark Laws Date: Thu, 3 Sep 2015 23:44:22 +0900 Subject: [PATCH] Fix `haskell-interactive-types-for-show-ambiguous' --- haskell-interactive-mode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/haskell-interactive-mode.el b/haskell-interactive-mode.el index 5f292213d..bda412127 100644 --- a/haskell-interactive-mode.el +++ b/haskell-interactive-mode.el @@ -1016,8 +1016,8 @@ don't care when the thing completes as long as it's soonish." "Look for an compile error; if there is one, pop that up in a buffer, similar to `debug-on-error'." (when (and haskell-interactive-types-for-show-ambiguous - (string-match "^\n:[0-9]+:[0-9]+:" response) - (not (string-match "^\n:[0-9]+:[0-9]+:[\n ]+Warning:" response))) + (string-match "^\n:[-0-9]+:[-0-9]+:" response) + (not (string-match "^\n:[-0-9]+:[-0-9]+:[\n ]+Warning:" response))) (let ((inhibit-read-only t)) (delete-region haskell-interactive-mode-prompt-start (point)) (set-marker haskell-interactive-mode-prompt-start