From c3dff6438962e25b4296dcf1bffa5c30bbd3fd5a Mon Sep 17 00:00:00 2001 From: Kazu Yamamoto Date: Wed, 19 Aug 2015 15:21:59 +0900 Subject: [PATCH] M-t now replace type hole. (#545). --- elisp/ghc-check.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/elisp/ghc-check.el b/elisp/ghc-check.el index 7f16d63..5819a17 100644 --- a/elisp/ghc-check.el +++ b/elisp/ghc-check.el @@ -420,6 +420,10 @@ nil do not display errors/warnings. (let ((old (match-string 1 data)) (new (match-string 2 data))) (ghc-check-replace old new))) + ((string-match "Found hole .\\(_[_[:alnum:]]*\\). with type: \\([^\t\n]+\\)" data) + (let ((old (match-string 1 data)) + (new (match-string 2 data))) + (ghc-check-replace old new))) (t (setq ret nil)))))))