From 623fc7a3a53b97e2073ae7669af7954c3d51b69c Mon Sep 17 00:00:00 2001 From: jao Date: Fri, 10 Jun 2022 03:58:32 +0100 Subject: jao-dirmon: remember date --- lib/eos/jao-dirmon.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/eos/jao-dirmon.el b/lib/eos/jao-dirmon.el index 894d740..648d207 100644 --- a/lib/eos/jao-dirmon.el +++ b/lib/eos/jao-dirmon.el @@ -52,9 +52,11 @@ (when (> d jao-dirmon-threshold) (push c high)))) (setq jao-dirmon-last-delta high) - (let ((prompt (format "High deltas: %s. Save state?" high))) + (let ((prompt (format "High deltas since %s: %s. Save state?" + (c-a-r old) high))) (when (y-or-n-p prompt) - (setf (multisession-value jao-dirmon-last) current))) + (setf (multisession-value jao-dirmon-last) + (cons (current-time-string) current)))) jao-dirmon-last-delta)) (provide 'jao-dirmon) -- cgit v1.2.3