From: teranisi <teranisi>
Date: Thu, 15 Jun 2000 00:23:38 +0000 (+0000)
Subject: 2000-06-15  Yuuichi Teranishi  <teranisi@gohome.org>
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=21aec7e9fcbe210a2401d4a064afb164d15bd618;p=elisp%2Fwanderlust.git

2000-06-15  Yuuichi Teranishi  <teranisi@gohome.org>

	* WL-ELS (ELMO-MODULES): Added `pldap'.

2000-06-12  Yasushi ABE <yasushi@stbbs.net>

	* utils/bbdb-wl.el (bbdb-extract-field-value): Decode with
	multibyte-buffer.
---

diff --git a/ChangeLog b/ChangeLog
index abea638..74adae9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,7 +1,17 @@
+2000-06-15  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* WL-ELS (ELMO-MODULES): Added `pldap'.
+
+2000-06-12  Yasushi ABE <yasushi@stbbs.net>
+
+	* utils/bbdb-wl.el (bbdb-extract-field-value): Decode with
+	multibyte-buffer.
+
 2000-05-15  Katsumi Yamaoka <yamaoka@jpl.org>
 
 	* etc/icons/wl-logo.xpm: Reduced color.
 
+
 2000-05-10  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* 1.1.1 - "Purple Rain"
diff --git a/WL-ELS b/WL-ELS
index a440b26..8feb979 100644
--- a/WL-ELS
+++ b/WL-ELS
@@ -1,5 +1,5 @@
 ;;; WL-ELS  -*-Emacs-Lisp-*-
-;;; Time-stamp: <00/03/01 09:58:40 teranisi>
+;;; Time-stamp: <00/06/14 23:51:29 teranisi>
 
 ;;;;;;;;;;;;;;;;;;;;;   DO NOT EDIT THIS FILE   ;;;;;;;;;;;;;;;;;;;;;
 ;;;;;;;;;;;;;;;;;;;;;     INTERNAL USE ONLY     ;;;;;;;;;;;;;;;;;;;;;
@@ -19,7 +19,7 @@
    elmo-localdir elmo-msgdb elmo-vars elmo2
    elmo-cache elmo-multi elmo-filter elmo-pipe
    elmo-dop elmo-pop3 elmo-localnews elmo-maildir
-   elmo-date elmo-internal utf7
+   elmo-date elmo-internal utf7 pldap
    ))
 
 
diff --git a/utils/bbdb-wl.el b/utils/bbdb-wl.el
index 8aa0354..a1b7cdb 100644
--- a/utils/bbdb-wl.el
+++ b/utils/bbdb-wl.el
@@ -235,7 +235,6 @@ displaying the record corresponding to the sender of the current message."
 ;;; @ bbdb-extract-field-value -- stolen from tm-bbdb.
 ;;;
 (and (not (fboundp 'bbdb-extract-field-value-internal))
-     (not (fboundp 'tm:bbdb-extract-field-value)) ;; tm-bbdb
 ;;   (not (fboundp 'PLEASE_REPLACE_WITH_SEMI-BASED_MIME-BBDB)) ;; mime-bbdb
     (progn
       ;; (require 'bbdb-hooks) ; not provided.
@@ -243,11 +242,17 @@ displaying the record corresponding to the sender of the current message."
       (or (fboundp 'bbdb-header-start)
           (load "bbdb-hooks"))
       (fset 'bbdb-extract-field-value-internal
-            (symbol-function 'bbdb-extract-field-value))
+	    (cond 
+	     ((fboundp 'tm:bbdb-extract-field-value)
+	      (symbol-function 'tm:bbdb-extract-field-value))
+	     (t (symbol-function 'bbdb-extract-field-value))))
       (defun bbdb-extract-field-value (field)
 	(let ((value (bbdb-extract-field-value-internal field)))
-	  (and value
-	       (eword-decode-string value))))
+	  (with-temp-buffer ; to keep raw buffer unibyte.
+	    (elmo-set-buffer-multibyte
+	     default-enable-multibyte-characters)
+	    (and value
+		 (eword-decode-string value)))))
       ))