diff options
| -rw-r--r-- | lisp/vc/vc-hg.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el index 9dafaef7aaf..14df9d8b673 100644 --- a/lisp/vc/vc-hg.el +++ b/lisp/vc/vc-hg.el | |||
| @@ -1016,8 +1016,8 @@ hg binary." | |||
| 1016 | (not (vc-hg--requirements-understood-p repo)) | 1016 | (not (vc-hg--requirements-understood-p repo)) |
| 1017 | ;; Dirstate too small to be valid | 1017 | ;; Dirstate too small to be valid |
| 1018 | (< (nth 7 dirstate-attr) 40) | 1018 | (< (nth 7 dirstate-attr) 40) |
| 1019 | ;; We want to store 32-bit unsigned values in fixnums | 1019 | ;; We want to store 32-bit unsigned values in fixnums. |
| 1020 | (< most-positive-fixnum 4294967295) | 1020 | (zerop (lsh -1 32)) |
| 1021 | (progn | 1021 | (progn |
| 1022 | (setf repo-relative-filename | 1022 | (setf repo-relative-filename |
| 1023 | (file-relative-name truename repo)) | 1023 | (file-relative-name truename repo)) |