/[emacs]/emacs/lisp/ibuffer.el
ViewVC logotype

Diff of /emacs/lisp/ibuffer.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.6 by walters, Mon Feb 4 03:58:26 2002 UTC revision 1.7 by walters, Tue Feb 12 04:49:32 2002 UTC
# Line 1694  If optional argument INCLUDE-LINES is no Line 1694  If optional argument INCLUDE-LINES is no
1694    (unless (consp ibuffer-formats)    (unless (consp ibuffer-formats)
1695      (error "Ibuffer error: No formats!"))      (error "Ibuffer error: No formats!"))
1696    (setq ibuffer-current-format    (setq ibuffer-current-format
1697          (if (>= ibuffer-current-format (1- (length (ibuffer-current-formats))))          (if (>= ibuffer-current-format (1- (length (ibuffer-current-formats nil))))
1698              0              0
1699            (1+ ibuffer-current-format)))            (1+ ibuffer-current-format)))
1700    (ibuffer-update-format)    (ibuffer-update-format)

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26