This commit was generated by cvs2svn to compensate for changes in r533,

[elisp/tm.git] / tm-ew-e.el

diff --git a/tm-ew-e.el b/tm-ew-e.el
index e8a71bc..afb1fac 100644 (file)
--- a/tm-ew-e.el
+++ b/tm-ew-e.el
@@ -1,9 +1,9 @@
 ;;; tm-ew-e.el --- RFC 2047 based encoded-word encoder for GNU Emacs
 
-;; Copyright (C) 1995,1996 Free Software Foundation, Inc.
+;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
 
 ;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; Version: $Revision: 7.57 $
+;; Version: $Revision: 7.58 $
 ;; Keywords: encoded-word, MIME, multilingual, header, mail, news
 
 ;; This file is part of tm (Tools for MIME).
@@ -35,7 +35,7 @@
 ;;;
 
 (defconst tm-ew-e/RCS-ID
-  "$Id: tm-ew-e.el,v 7.57 1996/12/12 02:30:04 morioka Exp $")
+  "$Id: tm-ew-e.el,v 7.58 1997/02/11 10:49:13 morioka Exp $")
 (defconst mime-eword/encoder-version (get-version-string tm-ew-e/RCS-ID))
 
 
@@ -316,8 +316,7 @@ when Subject field is encoded by `mime/encode-message-header'.
             )
            (t
             (setq string (car rword))
-            (let* ((sl (length string))
-                   (p 0) np
+            (let* ((p 0) np
                    (str "") nstr)
               (while (and (< p len)
                           (progn