diff options
| author | Sean Whitton | 2025-12-17 13:21:37 +0000 |
|---|---|---|
| committer | Sean Whitton | 2025-12-17 13:21:37 +0000 |
| commit | 7844710e87f157ab95b68f145749aedfc8d4d2e4 (patch) | |
| tree | 390433bab6ea9224223cb272dcbccee6960570d0 | |
| parent | 6d7ff7478fcbc4af478d198babbb76ec49ee3780 (diff) | |
| download | emacs-7844710e87f157ab95b68f145749aedfc8d4d2e4.tar.gz emacs-7844710e87f157ab95b68f145749aedfc8d4d2e4.zip | |
log-view-toggle-entry-display: Don't deactivate the mark
* lisp/vc/log-view.el (log-view-toggle-entry-display): Bind
inhibit-read-only instead of buffer-read-only. Bind
deactivate-mark to nil.
| -rw-r--r-- | lisp/vc/log-view.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/vc/log-view.el b/lisp/vc/log-view.el index 752638b4fda..1ee427c345a 100644 --- a/lisp/vc/log-view.el +++ b/lisp/vc/log-view.el | |||
| @@ -495,7 +495,8 @@ This calls `log-view-expanded-log-entry-function' to do the work." | |||
| 495 | (let* ((opoint (point)) | 495 | (let* ((opoint (point)) |
| 496 | (entry (log-view-current-entry nil t)) | 496 | (entry (log-view-current-entry nil t)) |
| 497 | (beg (car entry)) | 497 | (beg (car entry)) |
| 498 | (buffer-read-only nil)) | 498 | (inhibit-read-only t) |
| 499 | deactivate-mark) | ||
| 499 | (when entry | 500 | (when entry |
| 500 | (if (get-text-property beg 'log-view-entry-expanded) | 501 | (if (get-text-property beg 'log-view-entry-expanded) |
| 501 | ;; If the entry is expanded, collapse it. | 502 | ;; If the entry is expanded, collapse it. |