Mercurial > emacs
changeset 104940:a674a112e64f
Put autoloads in ibuffer.el rather than loaddefs.el.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 11 Sep 2009 06:47:26 +0000 |
parents | 82d9b29c48c5 |
children | f02d30058310 |
files | lisp/ibuf-ext.el |
diffstat | 1 files changed, 9 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ibuf-ext.el Fri Sep 11 06:42:13 2009 +0000 +++ b/lisp/ibuf-ext.el Fri Sep 11 06:47:26 2009 +0000 @@ -1,7 +1,7 @@ ;;; ibuf-ext.el --- extensions for ibuffer -;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, -;; 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, +;; 2009 Free Software Foundation, Inc. ;; Author: Colin Walters <walters@verbum.org> ;; Maintainer: John Paul Wallington <jpw@gnu.org> @@ -544,7 +544,7 @@ (dolist (filtergroup filter-group-alist) (let ((filterset (cdr filtergroup))) (multiple-value-bind (hip-crowd lamers) - (values-list + (values-list (ibuffer-split-list (lambda (bufmark) (ibuffer-included-in-filters-p (car bufmark) filterset)) @@ -1161,10 +1161,10 @@ (string-lessp ;; FIXME: For now just compare the file name and the process name ;; (if it exists). Is there a better way to do this? - (or (buffer-file-name (car a)) + (or (buffer-file-name (car a)) (let ((pr-a (get-buffer-process (car a)))) (and (processp pr-a) (process-name pr-a)))) - (or (buffer-file-name (car b)) + (or (buffer-file-name (car b)) (let ((pr-b (get-buffer-process (car b)))) (and (processp pr-b) (process-name pr-b)))))) @@ -1598,5 +1598,9 @@ (provide 'ibuf-ext) +;; Local Variables: +;; generated-autoload-file: "ibuffer.el" +;; End: + ;; arch-tag: 9af21953-deda-4c30-b76d-f81d9128e76d ;;; ibuf-ext.el ends here