diff options
| author | Eli Zaretskii | 2025-10-04 17:18:12 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2025-10-04 17:18:12 +0300 |
| commit | 5ee1e205e1663409c9d0a196bd9bbec9b36cf53a (patch) | |
| tree | 1a7ce2840d148d318fe0e49379df613881062207 | |
| parent | d0c63b84276fd17ec330bec44cf82876ab48e489 (diff) | |
| download | emacs-5ee1e205e1663409c9d0a196bd9bbec9b36cf53a.tar.gz emacs-5ee1e205e1663409c9d0a196bd9bbec9b36cf53a.zip | |
; Improve the documentation of the last commit
* lisp/vc/log-view.el (log-view-copy-revision-as-kill):
* doc/emacs/maintaining.texi (VC Change Log):
* etc/NEWS: Improve wording of last commit. (Bug#79493)
| -rw-r--r-- | doc/emacs/maintaining.texi | 8 | ||||
| -rw-r--r-- | etc/NEWS | 6 | ||||
| -rw-r--r-- | lisp/vc/log-view.el | 4 |
3 files changed, 11 insertions, 7 deletions
diff --git a/doc/emacs/maintaining.texi b/doc/emacs/maintaining.texi index 2f8a15a0b0b..e7a05a3556b 100644 --- a/doc/emacs/maintaining.texi +++ b/doc/emacs/maintaining.texi | |||
| @@ -1245,9 +1245,11 @@ earlier revision (@code{log-view-diff-changeset}). This shows the | |||
| 1245 | changes to all files made in that revision. | 1245 | changes to all files made in that revision. |
| 1246 | 1246 | ||
| 1247 | @item w | 1247 | @item w |
| 1248 | Copy the revision of the log entry at point, or all marked revisions, to | 1248 | Copy to the kill ring (@pxref{Kill Ring}) the revision ID of the log |
| 1249 | the kill ring, as if you had used @kbd{M-w} | 1249 | entry at point, as if you had used @kbd{M-w} |
| 1250 | (@code{log-view-copy-revision-as-kill}). | 1250 | (@code{log-view-copy-revision-as-kill}). If several revisions are |
| 1251 | marked, the command copies to the kill ring the IDs of all of them, | ||
| 1252 | separated by spaces. | ||
| 1251 | 1253 | ||
| 1252 | @item @key{RET} | 1254 | @item @key{RET} |
| 1253 | In a compact-style log buffer (e.g., the one created by @kbd{C-x v L}), | 1255 | In a compact-style log buffer (e.g., the one created by @kbd{C-x v L}), |
| @@ -2395,8 +2395,10 @@ In addition, a new command 'U' removes all marks. | |||
| 2395 | 2395 | ||
| 2396 | +++ | 2396 | +++ |
| 2397 | *** New command 'w' in Log View mode. | 2397 | *** New command 'w' in Log View mode. |
| 2398 | 'w' now copies the revision of the log entry at point to the kill ring. | 2398 | The new command 'log-view-copy-revision-as-kill', by default bound to |
| 2399 | If there are marked revisions, it copies those, instead. | 2399 | 'w' in Log View mode, copies to the kill ring the ID of the revision at |
| 2400 | point in the log entry. If there are marked revisions, it copies the | ||
| 2401 | IDs of those, instead. | ||
| 2400 | 2402 | ||
| 2401 | ** Diff mode | 2403 | ** Diff mode |
| 2402 | 2404 | ||
diff --git a/lisp/vc/log-view.el b/lisp/vc/log-view.el index ca84f4b7452..68ce4f1baa5 100644 --- a/lisp/vc/log-view.el +++ b/lisp/vc/log-view.el | |||
| @@ -751,8 +751,8 @@ considered file(s)." | |||
| 751 | fr to))) | 751 | fr to))) |
| 752 | 752 | ||
| 753 | (defun log-view-copy-revision-as-kill () | 753 | (defun log-view-copy-revision-as-kill () |
| 754 | "Copy the revision at point to the kill ring. | 754 | "Copy the ID of the revision at point to the kill ring. |
| 755 | If there are marked revisions, use those, separated by spaces." | 755 | If there are marked revisions, copy the IDs of those, separated by spaces." |
| 756 | (interactive) | 756 | (interactive) |
| 757 | (let ((revisions (log-view-get-marked))) | 757 | (let ((revisions (log-view-get-marked))) |
| 758 | (if (length> revisions 1) | 758 | (if (length> revisions 1) |