/[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.10 by walters, Fri Mar 8 04:04:22 2002 UTC revision 1.11 by walters, Wed Mar 13 02:31:26 2002 UTC
# Line 1585  become unmarked." Line 1585  become unmarked."
1585      (let ((buf (ibuffer-current-buffer)))      (let ((buf (ibuffer-current-buffer)))
1586        (when buf        (when buf
1587          (let ((mark (ibuffer-current-mark)))          (let ((mark (ibuffer-current-mark)))
1588            (delete-region (point) (1+ (line-end-position)))            (save-excursion
1589            (ibuffer-insert-buffer-line              (delete-region (point) (1+ (line-end-position)))
1590             buf mark              (ibuffer-insert-buffer-line
1591             (ibuffer-current-format))               buf mark
1592                 (ibuffer-current-format)))
1593            (when ibuffer-shrink-to-minimum-size            (when ibuffer-shrink-to-minimum-size
1594              (ibuffer-shrink-to-fit)))))))              (ibuffer-shrink-to-fit)))))))
1595        

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

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