07/06/07 16:18:59
>>42
;; ibuffer-visit-buffer-other-window-scroll
- (let ((buf (ibuffer-current-buffer)))
+ (let ((buf (ibuffer-current-buffer))
+ (same-window-regexps nil)
+ (same-window-buffer-names nil))
2つの関数のアドバイスをはずして、コマンドを定義する。
(define-key ibuffer-mode-map "n" 'ibuffer-forward-view)
(define-key ibuffer-mode-map "p" 'ibuffer-backward-view)
(defun ibuffer-forward-view ()
(interactive)
(ibuffer-forward-line 1 t)
(ibuffer-visit-buffer-other-window-scroll-down))
(defun ibuffer-backward-view ()
(interactive)
(ibuffer-backward-line 1 t)
(ibuffer-visit-buffer-other-window-scroll))
;; ibuffer-do-convert-coding-system
- #'(lambda (buf mark beg end)
+ #'(lambda (buf mark)