[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 4ac29b9 2/2: Rename arguments for clarity
From: |
Dmitry Gutov |
Subject: |
master 4ac29b9 2/2: Rename arguments for clarity |
Date: |
Wed, 25 Aug 2021 21:48:22 -0400 (EDT) |
branch: master
commit 4ac29b943bdcc099f578660395b17b430551ff79
Author: Dmitry Gutov <dgutov@yandex.ru>
Commit: Dmitry Gutov <dgutov@yandex.ru>
Rename arguments for clarity
* lisp/vc/vc-git.el (vc-git--literal-pathspecs)
(vc-git--literal-pathspecs):
Rename arguments for clarity (bug#39452).
---
lisp/vc/vc-git.el | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 779326b..396d55a 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -242,14 +242,14 @@ included in the completions."
;;;###autoload (load "vc-git" nil t)
;;;###autoload (vc-git-registered file))))
-(defun vc-git--literal-pathspec (pathspec)
- "Prepend :(literal) path magic to PATHSPEC."
- ;; Good example of PATHSPEC that needs this: "test[56].xx".
- (and pathspec (concat ":(literal)" (file-local-name pathspec))))
-
-(defun vc-git--literal-pathspecs (pathspecs)
- "Prepend :(literal) path magic to PATHSPECS."
- (mapcar #'vc-git--literal-pathspec pathspecs))
+(defun vc-git--literal-pathspec (file)
+ "Prepend :(literal) path magic to FILE."
+ ;; Good example of file name that needs this: "test[56].xx".
+ (and file (concat ":(literal)" (file-local-name file))))
+
+(defun vc-git--literal-pathspecs (files)
+ "Prepend :(literal) path magic to FILES."
+ (mapcar #'vc-git--literal-pathspec files))
(defun vc-git-registered (file)
"Check whether FILE is registered with git."