diff --git a/elisp/ghc-flymake.el b/elisp/ghc-flymake.el
index 397d552..d307dc5 100644
--- a/elisp/ghc-flymake.el
+++ b/elisp/ghc-flymake.el
@@ -80,7 +80,7 @@
     (goto-char (point-min))
     (when (re-search-forward "Inferred type: " nil t)
       (delete-region (point-min) (point)))
-    (when (re-search-forward "forall [^.]+\\. " nil t)
+    (when (re-search-forward " forall [^.]+\\." nil t)
       (replace-match ""))
     (while (re-search-forward "\0 +" nil t)
       (replace-match " "))