From: morioka Date: Mon, 31 Aug 1998 12:04:01 +0000 (+0000) Subject: Rename `tm-eword::phrase-to-rwl' -> X-Git-Tag: flim-1_9_1~10 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9b03bef87be75b7260b82d80918328ec8a9c0687;p=elisp%2Fflim.git Rename `tm-eword::phrase-to-rwl' -> `eword-encode-phrase-to-rword-list'. --- diff --git a/eword-encode.el b/eword-encode.el index 95996ae..d3188b5 100644 --- a/eword-encode.el +++ b/eword-encode.el @@ -377,7 +377,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is ;;; @ converter ;;; -(defun tm-eword::phrase-to-rwl (phrase) +(defun eword-encode-phrase-to-rword-list (phrase) (let (token type dest str) (while phrase (setq token (car phrase)) @@ -470,7 +470,7 @@ MODE is allows `text', `comment', `phrase' or nil. Default value is (if (eq (car (car phrase)) 'spaces) (setq phrase (cdr phrase)) ) - (setq dest (tm-eword::phrase-to-rwl phrase)) + (setq dest (eword-encode-phrase-to-rword-list phrase)) (if dest (setq dest (append dest '((" " nil nil)))) )