From 4ac29b943bdcc099f578660395b17b430551ff79 Mon Sep 17 00:00:00 2001 From: Dmitry Gutov Date: Thu, 26 Aug 2021 04:48:05 +0300 Subject: [PATCH] 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 779326be3fd..396d55adb2d 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." -- 2.39.2