From 67b0b6cc31a26b7004fffe7bf3f80f3f8d6e527c Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 31 Aug 1998 12:02:19 +0000 Subject: [PATCH] Rename `eword-encode-addresses-to-rwl' -> `eword-encode-addresses-to-rword-list'. --- eword-encode.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/eword-encode.el b/eword-encode.el index 3574c16..95996ae 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)) -(defsubst eword-encode-addresses-to-rwl (addresses) +(defsubst eword-encode-addresses-to-rword-list (addresses) (let ((dest (tm-eword::mailbox-to-rwl (car addresses)))) (if dest (while (setq addresses (cdr addresses)) @@ -531,10 +531,10 @@ Default value is `phrase'." (defun eword-encode-address-list (string &optional column) "Encode header field STRING as list of address, and return the result. Optional argument COLUMN is start-position of the field." - (car (eword-encode-rword-list - (or column 0) - (eword-encode-addresses-to-rwl (std11-parse-addresses-string string)) - ))) + (car (eword-encode-rword-list (or column 0) + (eword-encode-addresses-to-rword-list + (std11-parse-addresses-string string)) + ))) (defun eword-encode-structured-field-body (string &optional column) "Encode header field STRING as structured field, and return the result. -- 1.7.10.4