diff options
| author | Stefan Kangas <stefan@marxist.se> | 2020-11-03 02:06:05 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2020-11-03 02:11:19 +0100 |
| commit | 499847ab952299f0d978291ed8e84a9b13786e80 (patch) | |
| tree | 6d2efdd270b2b7176f05766047bf5374fc9bbaa4 /lisp/pcmpl-cvs.el | |
| parent | e1644c065e3d31c1c01456322ec1a37208eb3bd3 (diff) | |
| download | emacs-499847ab952299f0d978291ed8e84a9b13786e80.tar.gz | |
Use lexical-binding in pcmpl-cvs.el
* lisp/pcmpl-cvs.el: Use lexical-binding.
(executable): Remove unnecessary require.
(pcmpl-cvs-binary): Remove redundant :group arg.
(pcmpl-cvs-tags): Quote function symbol as such.
Diffstat (limited to 'lisp/pcmpl-cvs.el')
| -rw-r--r-- | lisp/pcmpl-cvs.el | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/pcmpl-cvs.el b/lisp/pcmpl-cvs.el index 1b49b297e42..13f3093c218 100644 --- a/lisp/pcmpl-cvs.el +++ b/lisp/pcmpl-cvs.el @@ -1,4 +1,4 @@ -;;; pcmpl-cvs.el --- functions for dealing with cvs completions +;;; pcmpl-cvs.el --- functions for dealing with cvs completions -*- lexical-binding: t -*- ;; Copyright (C) 1999-2020 Free Software Foundation, Inc. @@ -29,7 +29,6 @@ (provide 'pcmpl-cvs) (require 'pcomplete) -(require 'executable) (defgroup pcmpl-cvs nil "Functions for dealing with CVS completions." @@ -39,8 +38,7 @@ (defcustom pcmpl-cvs-binary (or (executable-find "cvs") "cvs") "The full path of the `cvs' binary." - :type 'file - :group 'pcmpl-cvs) + :type 'file) ;; Functions: @@ -139,7 +137,7 @@ (let ((entries (pcmpl-cvs-entries opers)) tags) (with-temp-buffer - (apply 'call-process pcmpl-cvs-binary nil t nil + (apply #'call-process pcmpl-cvs-binary nil t nil "status" "-v" entries) (goto-char (point-min)) (while (re-search-forward "Existing Tags:" nil t) |