* lisp/vc/vc-hg.el (vc-hg-checkin): Pass '-A' to 'hg commit'.

2 files changed, 2 insertions, 2 deletions

diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el
index b39a8c6928a..5bb826d555f 100644
--- a/lisp/vc/vc-hg.el
+++ b/lisp/vc/vc-hg.el
@@ -1216,7 +1216,7 @@ It is based on `log-edit-mode', and has Hg-specific extensions.")
 (defun vc-hg-checkin (files comment &optional _rev)
   "Hg-specific version of `vc-BACKEND-checkin'.
 REV is ignored."
-  (let ((args (nconc (list "commit" "-m")
+  (let ((args (nconc (list "commit" "-A" "-m")
                      (vc-hg--extract-headers comment))))
     (if vc-async-checkin
         (let ((buffer (vc-hg--async-buffer)))
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el
index 135762fc806..f2972f10e6a 100644
--- a/lisp/vc/vc.el
+++ b/lisp/vc/vc.el
@@ -1604,7 +1604,7 @@ from which to check out the file(s)."
             ;; If committing a mix of removed and edited files, the
             ;; fileset has state = 'edited.  Rather than checking the
             ;; state of each individual file in the fileset, it seems
-            ;; simplest to just check if the file exists.        Bug#9781.
+            ;; simplest to just check if the file exists.  Bug#9781.
             (when (and (file-exists-p file) (not (file-writable-p file)))
               ;; Make the file-buffer read-write.
               (unless (y-or-n-p (format "%s is edited but read-only; make it writable and continue? " file))