diff options
| -rw-r--r-- | lisp/vc/vc-hg.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/vc/vc-hg.el b/lisp/vc/vc-hg.el index d11dc4c5f41..76eec884a17 100644 --- a/lisp/vc/vc-hg.el +++ b/lisp/vc/vc-hg.el @@ -629,7 +629,7 @@ Return the byte's value as an integer." ;; 1+4*4 is the length of the dirstate item header. (forward-char (1+ (* 3 4))) (let ((this-flen (vc-hg--read-u32-be))) - (if (and (or (eql this-flen flen) + (if (and (or (eq this-flen flen) (and (> this-flen flen) (eq (char-after (+ (point) flen)) 0))) (search-forward fname (+ (point) flen) t)) |