diff --git a/elisp/ghc-comp.el b/elisp/ghc-comp.el
index 71159b3..53a323c 100644
--- a/elisp/ghc-comp.el
+++ b/elisp/ghc-comp.el
@@ -177,7 +177,7 @@ 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)
+      (if (re-search-backward "[ (,`]" beg t) ;; xxx "."
 	  (1+ (point))
 	beg))))