catching up the spec check.

2014-03-27 14:23:32 +09:00 · 2014-03-27 14:23:32 +09:00 · cb9db4fd1a
commit cb9db4fd1a
parent 7141ec5db1
1 changed files with 1 additions and 2 deletions
--- a/elisp/ghc-check.el
+++ b/elisp/ghc-check.el
@ -218,8 +218,7 @@
    (goto-char (point-min))
    (while (re-search-forward "\\[Char\\]" nil t)
      (replace-match "String"))
-    (re-search-forward "\0" nil t)
-    (buffer-substring-no-properties (point-min) (1- (point)))))
+    (buffer-substring-no-properties (point-min) (point-max))))

 (defun ghc-get-function-name ()
  (save-excursion