From: teranisi <teranisi>
Date: Thu, 24 Aug 2000 00:22:52 +0000 (+0000)
Subject: * eword-encode.el (eword-encode-address-to-rword-list): Define as function.
X-Git-Tag: slim-1_14_2~1
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=3ef8a95dc3b5967e09122227391f0b13f35786d4;p=elisp%2Fflim.git

* eword-encode.el (eword-encode-address-to-rword-list): Define as function.
(eword-encode-addresses-to-rword-list): Ditto.
---

diff --git a/ChangeLog b/ChangeLog
index d42056b..460905d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2000-08-24  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* eword-encode.el (eword-encode-address-to-rword-list): Define as
+	function.
+	(eword-encode-addresses-to-rword-list): Ditto.
+
 2000-08-23  Kenichi OKADA <okada@opaopa.org>
 
 	* smtp.el (smtp-fqdn): New variable.
diff --git a/eword-encode.el b/eword-encode.el
index e328ca7..fb988d0 100644
--- a/eword-encode.el
+++ b/eword-encode.el
@@ -517,7 +517,7 @@ MODE is allows `text', `comment', `phrase' or nil.  Default value is
 		      )))
     dest))
 
-(defsubst eword-encode-address-to-rword-list (address)
+(defun eword-encode-address-to-rword-list (address)
   (cond
    ((eq (car address) 'mailbox)
     (eword-encode-mailbox-to-rword-list address))
@@ -528,7 +528,7 @@ MODE is allows `text', `comment', `phrase' or nil.  Default value is
      (eword-encode-addresses-to-rword-list (nth 2 address))
      (list (list ";" nil nil))))))
 
-(defsubst eword-encode-addresses-to-rword-list (addresses)
+(defun eword-encode-addresses-to-rword-list (addresses)
   (let ((dest (eword-encode-address-to-rword-list (car addresses))))
     (if dest
 	(while (setq addresses (cdr addresses))