[elpa] externals/vc-backup 2bee77b 11/18: Just use a fixnum in vc-backup-diff.

[ELPA Syncer]

branch: externals/vc-backup
commit 2bee77bc19e2ef62d763f64f72f6b1a0a3f7b51f
Author: Alfred M. Szmidt <ams@gnu.org>
Commit: Philip Kaludercic <philipk@posteo.net>

    Just use a fixnum in vc-backup-diff.
---
 vc-backup.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/vc-backup.el b/vc-backup.el
index 29f1266..30d9fa4 100644
--- a/vc-backup.el
+++ b/vc-backup.el
@@ -330,7 +330,7 @@ BUFFER and ASYNC as interpreted as specified in vc.el."
   (setq rev1 (or rev1 vc-backup--current-tag))
   (setq rev2 (or rev2 (vc-backup--last-rev files)))
   (save-window-excursion
-    (let ((dirty nil))
+    (let ((dirty 0))
       (dolist (file files)
        (let ((diff (diff-no-select
                     (vc-backup--get-backup-file file rev2)
@@ -341,8 +341,8 @@ BUFFER and ASYNC as interpreted as specified in vc.el."
          (unless async
            (with-current-buffer diff
              (unless (search-forward "no differences" nil t)
-               (setq dirty t))))))
-      (if dirty 1 0))))
+               (setq dirty 1))))))
+      dirty)))
 
 (defun vc-backup-revision-completion-table (files)
   "Return a list of revisions for FILES."