M-t now replace type hole. (#545).
This commit is contained in:
parent
bb3a948912
commit
c3dff64389
@ -420,6 +420,10 @@ nil do not display errors/warnings.
|
|||||||
(let ((old (match-string 1 data))
|
(let ((old (match-string 1 data))
|
||||||
(new (match-string 2 data)))
|
(new (match-string 2 data)))
|
||||||
(ghc-check-replace old new)))
|
(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
|
(t
|
||||||
(setq ret nil)))))))
|
(setq ret nil)))))))
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user