diff --git a/elisp/ghc-comp.el b/elisp/ghc-comp.el index 53a323c..b089705 100644 --- a/elisp/ghc-comp.el +++ b/elisp/ghc-comp.el @@ -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