diff options
author | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-10-05 06:36:32 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-10-05 06:36:32 +0000 |
commit | 1225bc492980972db7a8c2c23fc4a65d35100e2f (patch) | |
tree | fb1517f80a635317faaa9397a3209d11aa2e6245 /lisp/gnus/gnus-util.el | |
parent | 7b0e3048f0359b6e1802cabf2c97299cdb2585fc (diff) | |
download | emacs-1225bc492980972db7a8c2c23fc4a65d35100e2f.tar.gz |
Merge changes made ein Gnus trunk.
gnus-util.el (gnus-completing-read-function): Exclude gnus-icompleting-read and gnus-ido-completing-read from candidates for XEmacs since iswitchb.el is very old and ido.el is unavailable in XEmacs.
gnus-registry.el (gnus-registry-install-nnregistry): Rewrite so as not to use `delete-dups' that is unavailable in XEmacs 21.4.
Diffstat (limited to 'lisp/gnus/gnus-util.el')
-rw-r--r-- | lisp/gnus/gnus-util.el | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/lisp/gnus/gnus-util.el b/lisp/gnus/gnus-util.el index e4b8f8f87da..414f1c45440 100644 --- a/lisp/gnus/gnus-util.el +++ b/lisp/gnus/gnus-util.el @@ -48,15 +48,18 @@ "Function use to do completing read." :version "24.1" :group 'gnus-meta - :type '(radio (function-item + :type `(radio (function-item :doc "Use Emacs standard `completing-read' function." gnus-emacs-completing-read) - (function-item - :doc "Use `ido-completing-read' function." - gnus-ido-completing-read) - (function-item - :doc "Use iswitchb based completing-read function." - gnus-iswitchb-completing-read))) + ;; iswitchb.el is very old and ido.el is unavailable + ;; in XEmacs, so we exclude those function items. + ,@(unless (featurep 'xemacs) + '((function-item + :doc "Use `ido-completing-read' function." + gnus-ido-completing-read) + (function-item + :doc "Use iswitchb based completing-read function." + gnus-iswitchb-completing-read))))) (defcustom gnus-completion-styles (if (and (boundp 'completion-styles-alist) |