summaryrefslogtreecommitdiff
path: root/lisp/midnight.el
diff options
context:
space:
mode:
authorDeepak Goel <deego@gnufans.org>2009-03-13 19:43:38 +0000
committerDeepak Goel <deego@gnufans.org>2009-03-13 19:43:38 +0000
commitf5fbd9ad219df87e468dd3a35b6df37af5f49d6b (patch)
treea3c8ac96e0d0b55bca11176baad605b993742e00 /lisp/midnight.el
parentbf020df6ea28468be7d6e75b458ce0ab73cc1e91 (diff)
downloademacs-f5fbd9ad219df87e468dd3a35b6df37af5f49d6b.tar.gz
M-v correctness.
Diffstat (limited to 'lisp/midnight.el')
-rw-r--r--lisp/midnight.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/midnight.el b/lisp/midnight.el
index 710c9fafe0b..a3546fe7ad4 100644
--- a/lisp/midnight.el
+++ b/lisp/midnight.el
@@ -205,7 +205,8 @@ The default value is `clean-buffer-list'."
(defun midnight-next ()
"Return the number of seconds till the next midnight."
- (multiple-value-bind (sec min hrs) (decode-time)
+ (multiple-value-bind (sec min hrs)
+ (values-list (decode-time))
(- (* 24 60 60) (* 60 60 hrs) (* 60 min) sec)))
;;;###autoload