X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/1de79de6691409bbc044c614991a0c01bb72521f..7d0db9ea6232b0167d9d437fc72a9ee16a028747:/company-abbrev.el diff --git a/company-abbrev.el b/company-abbrev.el index a454aaa90..24ec3b775 100644 --- a/company-abbrev.el +++ b/company-abbrev.el @@ -1,6 +1,6 @@ -;;; company-abbrev.el --- company-mode completion back-end for abbrev +;;; company-abbrev.el --- company-mode completion backend for abbrev -;; Copyright (C) 2009-2011 Free Software Foundation, Inc. +;; Copyright (C) 2009-2011, 2015 Free Software Foundation, Inc. ;; Author: Nikolaj Schumacher @@ -35,7 +35,7 @@ ;;;###autoload (defun company-abbrev (command &optional arg &rest ignored) - "`company-mode' completion back-end for abbrev." + "`company-mode' completion backend for abbrev." (interactive (list 'interactive)) (cl-case command (interactive (company-begin-backend 'company-abbrev @@ -44,8 +44,7 @@ (candidates (nconc (delete "" (all-completions arg global-abbrev-table)) (delete "" (all-completions arg local-abbrev-table)))) - (meta (abbrev-expansion arg)) - (require-match t))) + (meta (abbrev-expansion arg)))) (provide 'company-abbrev) ;;; company-abbrev.el ends here