diff options
| -rw-r--r-- | lisp/vc/vc.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index f08e562efe5..0a2169534e5 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el | |||
| @@ -1433,8 +1433,9 @@ Argument BACKEND is the backend you are using." | |||
| 1433 | (lambda (str) | 1433 | (lambda (str) |
| 1434 | ;; Commented or empty lines. | 1434 | ;; Commented or empty lines. |
| 1435 | (string-match-p "\\`\\(?:#\\|[ \t\r\n]*\\'\\)" str)) | 1435 | (string-match-p "\\`\\(?:#\\|[ \t\r\n]*\\'\\)" str)) |
| 1436 | (vc--read-lines | 1436 | (let ((file (vc-call-backend backend 'find-ignore-file file))) |
| 1437 | (vc-call-backend backend 'find-ignore-file file)))) | 1437 | (and (file-exists-p file) |
| 1438 | (vc--read-lines file))))) | ||
| 1438 | 1439 | ||
| 1439 | (defun vc--read-lines (file) | 1440 | (defun vc--read-lines (file) |
| 1440 | "Return a list of lines of FILE." | 1441 | "Return a list of lines of FILE." |