X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fgutter-items.el;h=b63504a6e4e04bd66abebb2911af4f883972efb2;hb=6804bfa681af8037fef714d5bd76e8c0800d97e7;hp=fab1de4e2156a91c19abc248cf4024808702eb3b;hpb=b10ee70be2e0ce31599b05e9d58f83fc92141de0;p=chise%2Fxemacs-chise.git

diff --git a/lisp/gutter-items.el b/lisp/gutter-items.el
index fab1de4..b63504a 100644
--- a/lisp/gutter-items.el
+++ b/lisp/gutter-items.el
@@ -277,7 +277,7 @@ redefining the function `format-buffers-menu-line'."
       (and (integerp buffers-tab-max-size)
 	   (> buffers-tab-max-size 1)
 	   (> (length buffers) buffers-tab-max-size)
-	   (setcdr (nthcdr buffers-tab-max-size buffers) nil))
+	   (setcdr (nthcdr (1- buffers-tab-max-size) buffers) nil))
       ;; sort buffers in group (default is most-recently-selected)
       (when buffers-tab-sort-function
 	(setq buffers (funcall buffers-tab-sort-function buffers)))