diff options
| author | Manuel Giraud | 2024-09-09 15:42:56 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2024-09-12 12:28:06 +0300 |
| commit | 06de3ae412e70d414cb9e149ca49aac8697309bb (patch) | |
| tree | 2402d13d7d24caabb1c2dbdf3d70221faee97ac5 | |
| parent | ddd3752b9442ba0528403822a5bb1b2e5e0ae985 (diff) | |
| download | emacs-06de3ae412e70d414cb9e149ca49aac8697309bb.tar.gz emacs-06de3ae412e70d414cb9e149ca49aac8697309bb.zip | |
Simple typo in `clean-buffer-list'
* lisp/midnight.el (clean-buffer-list): `delay' is always an
integer here. (Bug#73144)
| -rw-r--r-- | lisp/midnight.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/midnight.el b/lisp/midnight.el index bfa99d6a7a8..18a4e437f91 100644 --- a/lisp/midnight.el +++ b/lisp/midnight.el | |||
| @@ -167,7 +167,7 @@ lifetime, i.e., its \"age\" when it will be purged." | |||
| 167 | bn (buffer-name buf) | 167 | bn (buffer-name buf) |
| 168 | delay (if bts (round (float-time (time-subtract tm bts))) 0) | 168 | delay (if bts (round (float-time (time-subtract tm bts))) 0) |
| 169 | cbld (clean-buffer-list-delay bn)) | 169 | cbld (clean-buffer-list-delay bn)) |
| 170 | (message "[%s] `%s' [%s %d]" ts bn delay cbld) | 170 | (message "[%s] `%s' [%d %d]" ts bn delay cbld) |
| 171 | (unless (or (cl-find bn clean-buffer-list-kill-never-regexps | 171 | (unless (or (cl-find bn clean-buffer-list-kill-never-regexps |
| 172 | :test (lambda (bn re) | 172 | :test (lambda (bn re) |
| 173 | (if (functionp re) | 173 | (if (functionp re) |