diff --git a/haskell-completions.el b/haskell-completions.el index 94db9123a..98e0e0a5d 100644 --- a/haskell-completions.el +++ b/haskell-completions.el @@ -248,10 +248,6 @@ Returns nil if no completions available." ;; for completions list in case of module name or ;; identifier prefixes (haskell-completions-sync-complete-repl pfx imp))))) - (when (or (equal '("") lst) - (eql nil lst)) - ;; complete things using dabbrev - (setq lst (haskell-completions-dabbrev-completions pfx))) (when lst (list beg end lst))))))) @@ -266,11 +262,5 @@ function is supposed for internal use." (concat "import " prefix) prefix))) -(defun haskell-completions-dabbrev-completions (prefix) - "Return completion list for PREFIX using dabbrev facility. -This function is supposed for internal use." - (dabbrev--reset-global-variables) - (dabbrev--find-all-expansions prefix nil)) - (provide 'haskell-completions) ;;; haskell-completions.el ends here