From 80a06d647faa1dab77f77997a800f18fe5351ded Mon Sep 17 00:00:00 2001 From: Colin Walters Date: Tue, 12 Feb 2002 04:50:04 +0000 Subject: [PATCH] (ibuffer-switch-format): Supply required argument for `ibuffer-current-formats'. --- lisp/ChangeLog | 5 +++++ lisp/ibuffer.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e5286147be7..03a23d7bdc2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-02-11 Colin Walters + + * ibuffer.el (ibuffer-switch-format): Supply required argument for + `ibuffer-current-formats'. + 2002-02-12 Miles Bader * faces.el (mode-line-inactive): Add dark-background variant. diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el index 8ca3d9d1933..e3ae9dcc5c4 100644 --- a/lisp/ibuffer.el +++ b/lisp/ibuffer.el @@ -1694,7 +1694,7 @@ If optional argument INCLUDE-LINES is non-nil, return a list like (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) -- 2.39.5