hasufell/ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

module name that "where" locates in the next line.

Browse Source
This commit is contained in:
Kazu Yamamoto 2012-06-07 18:42:39 +09:00
parent 71038ce5d6
commit b743a8a890
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
elisp/ghc-info.el
View File

@ -167,7 +167,7 @@
(defun ghc-find-module-name () (defun ghc-find-module-name ()
(save-excursion (save-excursion
(goto-char (point-min)) (goto-char (point-min))
(if (re-search-forward "^module[ ]+\\([^ ]+\\)" nil t) (if (re-search-forward "^module[ ]+\\([^ \n]+\\)" nil t)
(match-string-no-properties 1)))) (match-string-no-properties 1))))
(provide 'ghc-info) (provide 'ghc-info)