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)

(cherry picked from commit 31e8500b061b6963708e66468fc89db1006226d7)

diff --git a/lisp/midnight.el b/lisp/midnight.el
index 18a4e437f919d3c9e66830a9b25a5382bd8f05b6..6e1e7b5ccb7c69c9537d37b895808b2cbddd153e 100644 (file)
--- a/lisp/midnight.el
+++ b/lisp/midnight.el
@@ -179,7 +179,8 @@ lifetime, i.e., its \"age\" when it will be purged."
                     (and (buffer-file-name buf) (buffer-modified-p buf))
                     (get-buffer-window buf 'visible)
                     (< delay cbld))
-          (message "[%s] killing `%s'" ts bn)
+          (message "[%s] killing `%s' (last displayed %s ago)" ts bn
+                   (format-seconds "%Y, %D, %H, %M, %z%S" delay))
           (kill-buffer buf))))))
 
 ;;; midnight hook