(wl-completing-read-multiple): Define as an alias of

`completing-read-multiple' if emacs-version is not less than 22.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 76a0af4..2571c31 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2006-11-22  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-util.el (wl-completing-read-multiple): Define as an alias of
+       `completing-read-multiple' if emacs-version is not less than 22.
+
 2006-11-12  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-mime.el (wl-mime-pgp-verify-region-with-epg): Follow the API

diff --git a/wl/wl-util.el b/wl/wl-util.el
index 739fe39..0bba527 100644 (file)
--- a/wl/wl-util.el
+++ b/wl/wl-util.el
@@ -1210,7 +1210,7 @@ is enclosed by at least one regexp grouping construct."
                                     nil initial-input
                                     hist def inherit-input-method))))
  (t
-  (defalias 'wl-completing-read-multiple 'wl-completing-read-multiple-2)))
+  (defalias 'wl-completing-read-multiple 'completing-read-multiple)))
 
 
 (require 'product)