758 |
ibuffer-yank |
ibuffer-yank |
759 |
:enable (and (featurep 'ibuf-ext) ibuffer-filter-group-kill-ring))) |
:enable (and (featurep 'ibuf-ext) ibuffer-filter-group-kill-ring))) |
760 |
|
|
761 |
(defvar ibuffer-name-map nil) |
(defvar ibuffer-name-map |
|
(unless ibuffer-name-map |
|
762 |
(let ((map (make-sparse-keymap))) |
(let ((map (make-sparse-keymap))) |
763 |
(define-key map [(mouse-1)] 'ibuffer-mouse-toggle-mark) |
(define-key map [(mouse-1)] 'ibuffer-mouse-toggle-mark) |
764 |
(define-key map [(mouse-2)] 'ibuffer-mouse-visit-buffer) |
(define-key map [(mouse-2)] 'ibuffer-mouse-visit-buffer) |
765 |
(define-key map [down-mouse-3] 'ibuffer-mouse-popup-menu) |
(define-key map [down-mouse-3] 'ibuffer-mouse-popup-menu) |
766 |
(setq ibuffer-name-map map))) |
map)) |
767 |
|
|
768 |
(defvar ibuffer-mode-name-map nil) |
(defvar ibuffer-mode-name-map |
|
(unless ibuffer-mode-name-map |
|
769 |
(let ((map (make-sparse-keymap))) |
(let ((map (make-sparse-keymap))) |
770 |
(define-key map [(mouse-2)] 'ibuffer-mouse-filter-by-mode) |
(define-key map [(mouse-2)] 'ibuffer-mouse-filter-by-mode) |
771 |
(define-key map (kbd "RET") 'ibuffer-interactive-filter-by-mode) |
(define-key map (kbd "RET") 'ibuffer-interactive-filter-by-mode) |
772 |
(setq ibuffer-mode-name-map map))) |
map)) |
773 |
|
|
774 |
(defvar ibuffer-mode-filter-group-map nil) |
(defvar ibuffer-mode-filter-group-map |
|
(unless ibuffer-mode-filter-group-map |
|
775 |
(let ((map (make-sparse-keymap))) |
(let ((map (make-sparse-keymap))) |
776 |
(define-key map [(mouse-1)] 'ibuffer-mouse-toggle-mark) |
(define-key map [(mouse-1)] 'ibuffer-mouse-toggle-mark) |
777 |
(define-key map [(mouse-2)] 'ibuffer-mouse-toggle-filter-group) |
(define-key map [(mouse-2)] 'ibuffer-mouse-toggle-filter-group) |
778 |
(define-key map (kbd "RET") 'ibuffer-toggle-filter-group) |
(define-key map (kbd "RET") 'ibuffer-toggle-filter-group) |
779 |
(define-key map [down-mouse-3] 'ibuffer-mouse-popup-menu) |
(define-key map [down-mouse-3] 'ibuffer-mouse-popup-menu) |
780 |
(setq ibuffer-mode-filter-group-map map))) |
map)) |
781 |
|
|
782 |
(defvar ibuffer-delete-window-on-quit nil |
(defvar ibuffer-delete-window-on-quit nil |
783 |
"Whether or not to delete the window upon exiting `ibuffer'.") |
"Whether or not to delete the window upon exiting `ibuffer'.") |
1040 |
(mapcar (if (eq type 'other-frame) |
(mapcar (if (eq type 'other-frame) |
1041 |
#'(lambda (buf) |
#'(lambda (buf) |
1042 |
(let ((curframe (selected-frame))) |
(let ((curframe (selected-frame))) |
1043 |
(select-frame (new-frame)) |
(select-frame (make-frame)) |
1044 |
(switch-to-buffer buf) |
(switch-to-buffer buf) |
1045 |
(select-frame curframe))) |
(select-frame curframe))) |
1046 |
#'(lambda (buf) |
#'(lambda (buf) |