diff options
Diffstat (limited to 'lisp/desktop.el')
| -rw-r--r-- | lisp/desktop.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/desktop.el b/lisp/desktop.el index a431d044b5f..acabde5eb2f 100644 --- a/lisp/desktop.el +++ b/lisp/desktop.el @@ -1544,10 +1544,10 @@ and try to load that." ;; for the sake of `clean-buffer-list': preserving the invariant ;; "how much time the user spent in Emacs without looking at this buffer". (setq buffer-display-time - (if buffer-display-time - (time-add buffer-display-time - (time-subtract nil desktop-file-modtime)) - (current-time))) + (time-since (if buffer-display-time + (time-subtract desktop-file-modtime + buffer-display-time) + 0))) (unless (< desktop-file-version 208) ; Don't misinterpret any old custom args (dolist (record compacted-vars) (let* |