diff options
| author | Manuel Giraud | 2024-09-09 17:16:32 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2024-09-12 12:30:36 +0300 |
| commit | 31e8500b061b6963708e66468fc89db1006226d7 (patch) | |
| tree | f28719522a4084e966f149614f18dd5652bddac6 | |
| parent | 06de3ae412e70d414cb9e149ca49aac8697309bb (diff) | |
| download | emacs-31e8500b061b6963708e66468fc89db1006226d7.tar.gz emacs-31e8500b061b6963708e66468fc89db1006226d7.zip | |
Human readable last display time of killed buffer
* lisp/midnight.el (clean-buffer-list): Upon killing a buffer,
add a human readable last displayed information. (Bug#73150)
| -rw-r--r-- | lisp/midnight.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/midnight.el b/lisp/midnight.el index 18a4e437f91..6e1e7b5ccb7 100644 --- a/lisp/midnight.el +++ b/lisp/midnight.el | |||
| @@ -179,7 +179,8 @@ lifetime, i.e., its \"age\" when it will be purged." | |||
| 179 | (and (buffer-file-name buf) (buffer-modified-p buf)) | 179 | (and (buffer-file-name buf) (buffer-modified-p buf)) |
| 180 | (get-buffer-window buf 'visible) | 180 | (get-buffer-window buf 'visible) |
| 181 | (< delay cbld)) | 181 | (< delay cbld)) |
| 182 | (message "[%s] killing `%s'" ts bn) | 182 | (message "[%s] killing `%s' (last displayed %s ago)" ts bn |
| 183 | (format-seconds "%Y, %D, %H, %M, %z%S" delay)) | ||
| 183 | (kill-buffer buf)))))) | 184 | (kill-buffer buf)))))) |
| 184 | 185 | ||
| 185 | ;;; midnight hook | 186 | ;;; midnight hook |