From c9bdf1c462945a1eaf7f0c9d8a2f3e1718b09572 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 31 Aug 1998 11:30:24 +0000 Subject: [PATCH] Rename `tm-eword::addresses-to-rwl' -> `eword-addresses-to-rwl'. --- eword-encode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/eword-encode.el b/eword-encode.el index 050112d..bdceb88 100644 --- a/eword-encode.el +++ b/eword-encode.el @@ -504,7 +504,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is ))) dest)) -(defun tm-eword::addresses-to-rwl (addresses) +(defsubst eword-addresses-to-rwl (addresses) (let ((dest (tm-eword::mailbox-to-rwl (car addresses)))) (if dest (while (setq addresses (cdr addresses)) @@ -533,7 +533,7 @@ Default value is `phrase'." Optional argument COLUMN is start-position of the field." (car (eword-encode-rword-list (or column 0) - (tm-eword::addresses-to-rwl (std11-parse-addresses-string string)) + (eword-addresses-to-rwl (std11-parse-addresses-string string)) ))) (defun eword-encode-structured-field-body (string &optional column) -- 1.7.10.4