diff --git a/attrap.el b/attrap.el
index 1dd9fab..9ac490f 100644
--- a/attrap.el
+++ b/attrap.el
@@ -333,7 +333,7 @@ Error is given as MSG and reported between POS and END."
            (identifier (n) (seq "‘" (group-n n (* (not "’"))) "’")))
   (append
    (when (string-match "Parse error in pattern: pattern" msg)
-     (attrap-insert-language-pragma "PatternSynonyms"))
+     (list (attrap-insert-language-pragma "PatternSynonyms")))
    (when (string-match "No explicit implementation for" msg)
     (attrap-one-option 'insert-method
       (let ((missings (s-match-strings-all "‘\\([^’]*\\)’"
@@ -532,7 +532,7 @@ Error is given as MSG and reported between POS and END."
               (save-excursion
                 (goto-char pos)
                 (string-match-p (rx "\\case\\_>") (buffer-substring-no-properties pos (line-end-position)))))
-     (attrap-insert-language-pragma "LambdaCase"))
+     (list (attrap-insert-language-pragma "LambdaCase")))
    (when (s-matches? (rx (or "Illegal symbol ‘forall’ in type"
                              (seq "Perhaps you intended to use"
                                   (* anything)