From: morioka <morioka>
Date: Sat, 21 Jun 1997 15:15:31 +0000 (+0000)
Subject: `tm-eword::lc-words-to-words' ->
X-Git-Tag: semi-0_96~31
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0463651110003a7cf31b15e9831e3f34656916bf;p=elisp%2Fsemi.git

`tm-eword::lc-words-to-words' ->
`eword-encode-charset-words-to-words'.
---

diff --git a/eword-encode.el b/eword-encode.el
index ae61a16..1609998 100644
--- a/eword-encode.el
+++ b/eword-encode.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Revision: 0.22 $
+;; Version: $Revision: 0.23 $
 ;; Keywords: encoded-word, MIME, multilingual, header, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -36,7 +36,7 @@
 ;;;
 
 (defconst eword-encode-RCS-ID
-  "$Id: eword-encode.el,v 0.22 1997-06-21 15:13:52 morioka Exp $")
+  "$Id: eword-encode.el,v 0.23 1997-06-21 15:15:31 morioka Exp $")
 (defconst eword-encode-version (get-version-string eword-encode-RCS-ID))
 
 
@@ -144,7 +144,7 @@ MODE is allows `text', `comment', `phrase' or nil.  Default value is
 ;;; @ word
 ;;;
 
-(defun tm-eword::lc-words-to-words (charset-words)
+(defun eword-encode-charset-words-to-words (charset-words)
   (let (dest)
     (while charset-words
       (let* ((charset-word (car charset-words))
@@ -243,7 +243,7 @@ MODE is allows `text', `comment', `phrase' or nil.  Default value is
 (defun tm-eword::split-string (str &optional mode)
   (tm-eword::space-process
    (tm-eword::words-to-ruled-words
-    (tm-eword::lc-words-to-words
+    (eword-encode-charset-words-to-words
      (eword-encode-divide-into-charset-words str))
     mode)))
 
@@ -415,7 +415,7 @@ MODE is allows `text', `comment', `phrase' or nil.  Default value is
 		   (append dest
 			   '(("(" nil nil))
 			   (tm-eword::words-to-ruled-words
-			    (tm-eword::lc-words-to-words
+			    (eword-encode-charset-words-to-words
 			     (eword-encode-divide-into-charset-words
 			      (cdr token)))
 			    'comment)
@@ -426,7 +426,7 @@ MODE is allows `text', `comment', `phrase' or nil.  Default value is
 	     (setq dest
 		   (append dest
 			   (tm-eword::words-to-ruled-words
-			    (tm-eword::lc-words-to-words
+			    (eword-encode-charset-words-to-words
 			     (eword-encode-divide-into-charset-words
 			      (cdr token))
 			     ) 'phrase)))