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

fixing a completion problem of Mod.Mod vs X.func.

This commit is contained in:
Kazu Yamamoto 2010-06-27 21:35:49 +09:00
parent b3523951c5
commit 2740a265cb
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
elisp/ghc-comp.el
View File

@ -176,12 +176,14 @@ unloaded modules are loaded")
(defun ghc-completion-start-point ()
(save-excursion
(let ((beg (save-excursion (beginning-of-line) (point))))
(if (re-search-backward "[ (,`]" beg t) ;; xxx "."
(let ((beg (save-excursion (beginning-of-line) (point)))
(regex (save-excursion
(beginning-of-line)
(if (looking-at "import") "[ (,`]" "[ (,`.]"))))
(if (re-search-backward regex beg t)
(1+ (point))
beg))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
;;; Loading keywords