diff --git a/elisp/ghc-flymake.el b/elisp/ghc-flymake.el
index e0b7d7e..096d68c 100644
--- a/elisp/ghc-flymake.el
+++ b/elisp/ghc-flymake.el
@@ -72,10 +72,10 @@
     (insert title "\n\n")
     (mapc (lambda (x) (insert (ghc-replace-character x ghc-null ghc-newline) "\n")) errs)
     (goto-char (point-min))
-    (while (re-search-forward "In the [^:\n]+: \\|Expected type: \\|Inferred type: \\|Possible fix: " nil t)
+    (while (re-search-forward "In the [^:\n ]+: \\|Expected type: \\|Inferred type: \\|Possible fix: " nil t)
       (replace-match (concat "\n" (match-string 0) "\n    ")))
     (goto-char (point-max))
-    (while (re-search-backward "In the [a-z]+ argument" nil t)
+    (while (re-search-backward "In the [a-z]+ argument\\|In the `" nil t)
       (insert "\n"))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;