diff options
| author | Julien Danjou | 2010-10-05 07:50:08 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka | 2010-10-05 07:50:08 +0000 |
| commit | 50cb700cf1e8e62261f4c1cdbdabd24a3c7aafac (patch) | |
| tree | 8d97ce694fb1ab5c90921a0f1b8446768e1f1e8b | |
| parent | 1225bc492980972db7a8c2c23fc4a65d35100e2f (diff) | |
| download | emacs-50cb700cf1e8e62261f4c1cdbdabd24a3c7aafac.tar.gz emacs-50cb700cf1e8e62261f4c1cdbdabd24a3c7aafac.zip | |
gnus-util.el (gnus-emacs-completing-read, gnus-iswitchb-completing-read): Use autoload rather than require.
| -rw-r--r-- | lisp/gnus/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/gnus/gnus-util.el | 5 |
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index f378310b2b9..9b7832b5cfb 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2010-10-05 Julien Danjou <julien@danjou.info> | ||
| 2 | |||
| 3 | * gnus-util.el (gnus-emacs-completing-read) | ||
| 4 | (gnus-iswitchb-completing-read): Use autoload rather than require. | ||
| 5 | |||
| 1 | 2010-10-05 Katsumi Yamaoka <yamaoka@jpl.org> | 6 | 2010-10-05 Katsumi Yamaoka <yamaoka@jpl.org> |
| 2 | 7 | ||
| 3 | * gnus-util.el (gnus-completing-read-function): Exclude | 8 | * gnus-util.el (gnus-completing-read-function): Exclude |
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index 414f1c45440..5fda600348c 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el | |||
| @@ -1611,16 +1611,17 @@ SPEC is a predicate specifier that contains stuff like `or', `and', | |||
| 1611 | (mapcar 'list collection) | 1611 | (mapcar 'list collection) |
| 1612 | nil require-match initial-input history def))) | 1612 | nil require-match initial-input history def))) |
| 1613 | 1613 | ||
| 1614 | (autoload 'ido-completing-read "ido") | ||
| 1614 | (defun gnus-ido-completing-read (prompt collection &optional require-match | 1615 | (defun gnus-ido-completing-read (prompt collection &optional require-match |
| 1615 | initial-input history def) | 1616 | initial-input history def) |
| 1616 | "Call `ido-completing-read-function'." | 1617 | "Call `ido-completing-read-function'." |
| 1617 | (require 'ido) | ||
| 1618 | (ido-completing-read prompt collection nil require-match initial-input history def)) | 1618 | (ido-completing-read prompt collection nil require-match initial-input history def)) |
| 1619 | 1619 | ||
| 1620 | |||
| 1621 | (autoload 'iswitchb-read-buffer "iswitchb") | ||
| 1620 | (defun gnus-iswitchb-completing-read (prompt collection &optional require-match | 1622 | (defun gnus-iswitchb-completing-read (prompt collection &optional require-match |
| 1621 | initial-input history def) | 1623 | initial-input history def) |
| 1622 | "`iswitchb' based completing-read function." | 1624 | "`iswitchb' based completing-read function." |
| 1623 | (require 'iswitchb) | ||
| 1624 | (let ((iswitchb-make-buflist-hook | 1625 | (let ((iswitchb-make-buflist-hook |
| 1625 | (lambda () | 1626 | (lambda () |
| 1626 | (setq iswitchb-temp-buflist | 1627 | (setq iswitchb-temp-buflist |