# HG changeset patch
# User Colin Walters <walters@gnu.org>
# Date 1013489372 0
# Node ID 783a6eac348c3a7c39bc7fd9b1a9f32f664edb4c
# Parent  9e2bfc2d4d230ab67c58854bf7fdd68a70608ae7
(ibuffer-switch-format): Supply required argument for
`ibuffer-current-formats'.

diff -r 9e2bfc2d4d23 -r 783a6eac348c lisp/ibuffer.el
--- a/lisp/ibuffer.el	Tue Feb 12 02:59:39 2002 +0000
+++ b/lisp/ibuffer.el	Tue Feb 12 04:49:32 2002 +0000
@@ -1694,7 +1694,7 @@
   (unless (consp ibuffer-formats)
     (error "Ibuffer error: No formats!"))
   (setq ibuffer-current-format
-	(if (>= ibuffer-current-format (1- (length (ibuffer-current-formats))))
+	(if (>= ibuffer-current-format (1- (length (ibuffer-current-formats nil))))
 	    0
 	  (1+ ibuffer-current-format)))
   (ibuffer-update-format)