M-v correctness.

3 files changed, 15 insertions, 5 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index be344f5d971..9f8704ef1ae 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2009-03-13  D. Goel  <deego3@gmail.com>
+
+        * midnight.el (midnight-next): Ditto.
+
+        * ibuf-ext.el (ibuffer-generate-filter-groups): 
+        (multiple-value-bind .. ls) -> (multiple-value-bind
+        .. (values-list ls))
+
 2009-03-13  Agustín Martín  <agustin.martin@hispalinux.es>
 
         * textmodes/ispell.el (ispell-get-word): Initialize spellchecker
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index fb68345be94..73c5840aefa 100644
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -544,10 +544,11 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
       (dolist (filtergroup filter-group-alist)
         (let ((filterset (cdr filtergroup)))
           (multiple-value-bind (hip-crowd lamers)
-              (ibuffer-split-list (lambda (bufmark)
-                                    (ibuffer-included-in-filters-p (car bufmark)
-                                                                   filterset))
-                                  bmarklist)
+              (values-list 
+               (ibuffer-split-list (lambda (bufmark)
+                                     (ibuffer-included-in-filters-p (car bufmark)
+                                                                    filterset))
+                                   bmarklist))
             (aset vec i hip-crowd)
             (incf i)
             (setq bmarklist lamers))))
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