Use ngettext in vc-dir-clean-files

* lisp/vc/vc-dir.el (vc-dir-clean-files): Use ngettext to separate
pluralization from format string.

diff --git a/lisp/vc/vc-dir.el b/lisp/vc/vc-dir.el
index 436a0a67223c18b32b24eedb2ae751031474acea..b823f2b3930c9e9995a89ecbe9054a5529849e33 100644 (file)
--- a/lisp/vc/vc-dir.el
+++ b/lisp/vc/vc-dir.el
@@ -780,8 +780,9 @@ system; see `vc-dir-delete-file'."
                                  'unregistered)))
                       files)))
     (when tracked
-      (user-error "Trying to clean tracked file%s: %s"
-                  (if (= (length tracked) 1) "" "s")
+      (user-error (ngettext "Trying to clean tracked file: %s"
+                            "Trying to clean tracked files: %s"
+                            (length tracked))
                   (mapconcat #'file-name-nondirectory tracked ", ")))
     (map-y-or-n-p "Delete %s? " #'delete-file files)
     (revert-buffer)))