Merge pull request #600 from geraldus/snapshot-build-fix

Use LIMIT for looking-back call.

Author: gracjan

haskell.el

@@ -80,7 +80,9 @@
              (let ((p (point)))
                (and (search-backward "{-#" nil t)
                   (search-forward-regexp "\\_<OPTIONS\\(?:_GHC\\)?\\_>" p t))))
-           (looking-back (rx symbol-start "-" (* (char alnum ?-)))))
+           (looking-back
+            (rx symbol-start "-" (* (char alnum ?-)))
+            (line-beginning-position)))
         (list (match-beginning 0) (match-end 0) haskell-ghc-supported-options))
        ;; Complete LANGUAGE :complete repl ":set -X..."
        ((and (nth 4 (syntax-ppss))