catching up the spec check.

This commit is contained in:
Kazu Yamamoto 2014-03-27 14:23:32 +09:00
parent 7141ec5db1
commit cb9db4fd1a

View File

@ -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