M-v correctness.

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

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))))

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