From d1addbd1440110e700bd7022a3d72cbeffc7f9da Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 31 Aug 1998 11:50:29 +0000 Subject: [PATCH] Rename `eword-phrase-route-addr-to-rwl' -> `eword-encode-phrase-route-addr-to-rword-list'. --- eword-encode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/eword-encode.el b/eword-encode.el index 8310874..b5d0414 100644 --- a/eword-encode.el +++ b/eword-encode.el @@ -462,7 +462,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is ) dest)) -(defun eword-phrase-route-addr-to-rwl (phrase-route-addr) +(defun eword-encode-phrase-route-addr-to-rword-list (phrase-route-addr) (if (eq (car phrase-route-addr) 'phrase-route-addr) (let ((phrase (nth 1 phrase-route-addr)) (route (nth 2 phrase-route-addr)) @@ -491,7 +491,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is (let ((addr (nth 1 mbox)) (comment (nth 2 mbox)) dest) - (setq dest (or (eword-phrase-route-addr-to-rwl addr) + (setq dest (or (eword-encode-phrase-route-addr-to-rword-list addr) (eword-addr-spec-to-rwl addr) )) (if comment -- 1.7.10.4