From: kaoru <kaoru>
Date: Wed, 12 Dec 2001 04:39:28 +0000 (+0000)
Subject: * bbdb-wl.el (bbdb-wl-setup): require bbdb-autoloads if exists.
X-Git-Tag: wl-2_8-root~29
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e18416d8fdb5e721c994650de54423f3baebc8c0;p=elisp%2Fwanderlust.git

* bbdb-wl.el (bbdb-wl-setup): require bbdb-autoloads if exists.
---

diff --git a/utils/ChangeLog b/utils/ChangeLog
index e499834..abb39b0 100644
--- a/utils/ChangeLog
+++ b/utils/ChangeLog
@@ -1,3 +1,7 @@
+2001-12-12  TAKAHASHI Kaoru  <kaoru@kaisei.org>
+
+	* bbdb-wl.el (bbdb-wl-setup): require bbdb-autoloads if exists.
+
 2001-10-06  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* bbdb-wl.el (bbdb-wl-get-petname): Fixed docstring.
diff --git a/utils/bbdb-wl.el b/utils/bbdb-wl.el
index 846fae9..ec01dc0 100644
--- a/utils/bbdb-wl.el
+++ b/utils/bbdb-wl.el
@@ -53,8 +53,11 @@
 	    (function
 	     (lambda ()
 ;;;	       (local-set-key "\M-\t" 'bbdb-complete-name)
-	       (define-key (current-local-map) "\M-\t" 'bbdb-complete-name)
-	       ))))
+	       (define-key (current-local-map) "\M-\t" 'bbdb-complete-name))))
+  ;; BBDB 2.00.06 or earlier: (provide 'bbdb-autoloads) in auto-autoloads.el
+  (when (and (not (featurep 'bbdb-autoloads))
+	     (module-installed-p 'bbdb-autoloads))
+    (require 'bbdb-autoloads)))
 
 (defun bbdb-wl-exit ()
   (let (bbdb-buf)