1644 |
(dolist (string column-strings) |
(dolist (string column-strings) |
1645 |
(setq total |
(setq total |
1646 |
;; like, ewww ... |
;; like, ewww ... |
1647 |
(+ (float (string-to-int string)) |
(+ (float (string-to-number string)) |
1648 |
total))) |
total))) |
1649 |
(format "%.0f" total)))) |
(format "%.0f" total)))) |
1650 |
(format "%s" (buffer-size))) |
(format "%s" (buffer-size))) |
1651 |
|
|
1652 |
(define-ibuffer-column mode (:inline t |
(define-ibuffer-column mode |
1653 |
:props |
(:inline t |
1654 |
('mouse-face 'highlight |
:props |
1655 |
'keymap ibuffer-mode-name-map |
('mouse-face 'highlight |
1656 |
'help-echo "mouse-2: filter by this mode")) |
'keymap ibuffer-mode-name-map |
1657 |
|
'help-echo "mouse-2: filter by this mode")) |
1658 |
(format "%s" mode-name)) |
(format "%s" mode-name)) |
1659 |
|
|
1660 |
(define-ibuffer-column process |
(define-ibuffer-column process |
2199 |
`ibuffer-restore-window-config-on-quit' is non-nil." |
`ibuffer-restore-window-config-on-quit' is non-nil." |
2200 |
(interactive) |
(interactive) |
2201 |
(if ibuffer-restore-window-config-on-quit |
(if ibuffer-restore-window-config-on-quit |
2202 |
(progn |
(progn |
2203 |
(bury-buffer) |
(bury-buffer) |
2204 |
(unless (= (count-windows) 1) |
(unless (= (count-windows) 1) |
2205 |
(set-window-configuration ibuffer-prev-window-config))) |
(set-window-configuration ibuffer-prev-window-config))) |