diff options
| author | Sean Whitton | 2025-06-04 12:03:08 +0100 |
|---|---|---|
| committer | Sean Whitton | 2025-06-04 13:25:52 +0100 |
| commit | 0ca6667c00e89f2fc7ad367a585ebb1f91669838 (patch) | |
| tree | f18462a8ccd60c17e1920eac932e57f3beab3455 | |
| parent | e3472e8ec5852fb2b3f29c174a085b8f5b8f6f42 (diff) | |
| download | emacs-0ca6667c00e89f2fc7ad367a585ebb1f91669838.tar.gz emacs-0ca6667c00e89f2fc7ad367a585ebb1f91669838.zip | |
; * lisp/vc/vc.el (vc-print-log-internal): Fix some indentation.
| -rw-r--r-- | lisp/vc/vc.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/vc.el b/lisp/vc/vc.el index f0ae5768c4c..04dbbf06cc3 100644 --- a/lisp/vc/vc.el +++ b/lisp/vc/vc.el | |||
| @@ -3054,7 +3054,7 @@ LIMIT can also be a string, which means the revision before which to stop." | |||
| 3054 | (let* ((dir-present (cl-some #'file-directory-p files)) | 3054 | (let* ((dir-present (cl-some #'file-directory-p files)) |
| 3055 | (shortlog (not (null (memq (if dir-present 'directory 'file) | 3055 | (shortlog (not (null (memq (if dir-present 'directory 'file) |
| 3056 | vc-log-short-style)))) | 3056 | vc-log-short-style)))) |
| 3057 | (buffer-name "*vc-change-log*") | 3057 | (buffer-name "*vc-change-log*") |
| 3058 | (type (or type (if shortlog 'short 'long)))) | 3058 | (type (or type (if shortlog 'short 'long)))) |
| 3059 | (vc-log-internal-common | 3059 | (vc-log-internal-common |
| 3060 | backend buffer-name files type | 3060 | backend buffer-name files type |
| @@ -3085,7 +3085,7 @@ LIMIT can also be a string, which means the revision before which to stop." | |||
| 3085 | (vc-call-backend bk 'show-log-entry working-revision))) | 3085 | (vc-call-backend bk 'show-log-entry working-revision))) |
| 3086 | (lambda (_ignore-auto _noconfirm) | 3086 | (lambda (_ignore-auto _noconfirm) |
| 3087 | (vc-print-log-internal backend files working-revision | 3087 | (vc-print-log-internal backend files working-revision |
| 3088 | is-start-revision limit type))))) | 3088 | is-start-revision limit type))))) |
| 3089 | 3089 | ||
| 3090 | (defvar vc-log-view-type nil | 3090 | (defvar vc-log-view-type nil |
| 3091 | "Set this to record the type of VC log shown in the current buffer. | 3091 | "Set this to record the type of VC log shown in the current buffer. |