diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-01-03 22:01:45 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2008-01-03 22:01:45 +0000 |
| commit | 9dfee9c2713c9d3322519e90b819dbf7b5889103 (patch) | |
| tree | fc6df903028c1fc749128de1930fc739fe68a0e4 /lisp/ibuf-ext.el | |
| parent | f86228e36cff54f5b18d47944b603901f997af99 (diff) | |
| download | emacs-9dfee9c2713c9d3322519e90b819dbf7b5889103.tar.gz | |
* ibuf-ext.el (mode-name sorter, ibuffer-mark-by-mode-regexp):
* ibuffer.el (mode column): Use format-mode-line.
Diffstat (limited to 'lisp/ibuf-ext.el')
| -rw-r--r-- | lisp/ibuf-ext.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el index 6a34ca0f4e4..8f252024774 100644 --- a/lisp/ibuf-ext.el +++ b/lisp/ibuf-ext.el @@ -1134,11 +1134,11 @@ Ordering is lexicographic." (string-lessp (downcase (with-current-buffer (car a) - mode-name)) + (format-mode-line mode-name))) (downcase (with-current-buffer (car b) - mode-name)))) + (format-mode-line mode-name))))) ;;;###autoload (autoload 'ibuffer-do-sort-by-alphabetic "ibuf-ext") (define-ibuffer-sorter alphabetic @@ -1386,7 +1386,7 @@ You can then feed the file name(s) to other commands with \\[yank]." (ibuffer-mark-on-buffer #'(lambda (buf) (with-current-buffer buf - (string-match regexp mode-name))))) + (string-match regexp (format-mode-line mode-name)))))) ;;;###autoload (defun ibuffer-mark-by-file-name-regexp (regexp) |