]> git.eshelyaron.com Git - emacs.git/commitdiff
Speed up vc-default-checkin-patch a little
authorDmitry Gutov <dgutov@yandex.ru>
Mon, 31 Oct 2022 00:48:16 +0000 (02:48 +0200)
committerDmitry Gutov <dgutov@yandex.ru>
Mon, 31 Oct 2022 00:51:49 +0000 (02:51 +0200)
* lisp/vc/vc.el (vc-default-checkin-patch): Drop some
'revert-buffer' calls to speed up the process a little (bug#52349).

lisp/vc/vc.el

index df51f52bc7c1c9cc4293b07fb2a0118444b5ee0c..3e78b8cfe96b33d2c566d63f84c7fd57d24bb754 100644 (file)
@@ -1715,9 +1715,6 @@ Runs the normal hooks `vc-before-checkin-hook' and `vc-checkin-hook'."
                                              "--no-backup-if-mismatch"
                                              "-i" "-"))
               (user-error "Patch failed: %s" (buffer-string))))
-          (dolist (f files)
-            (with-current-buffer (get-file-buffer f)
-              (revert-buffer t t t)))
           (vc-call-backend backend 'checkin files comment))
       (dolist (f files)
         (copy-file (expand-file-name f tmpdir)