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 () (defun ghc-completion-start-point ()
(save-excursion (save-excursion
(let ((beg (save-excursion (beginning-of-line) (point)))) (let ((beg (save-excursion (beginning-of-line) (point)))
(if (re-search-backward "[ (,`]" beg t) ;; xxx "." (regex (save-excursion
(beginning-of-line)
(if (looking-at "import") "[ (,`]" "[ (,`.]"))))
(if (re-search-backward regex beg t)
(1+ (point)) (1+ (point))
beg)))) beg))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; ;;;
;;; Loading keywords ;;; Loading keywords