`eword-exist-encoded-word-in-subject' -> `eword-in-subject-p'.

diff --git a/eword-encode.el b/eword-encode.el
index c08204b..bd2350a 100644 (file)
--- 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.5 $
+;; Version: $Revision: 0.6 $
 ;; Keywords: encoded-word, MIME, multilingual, header, mail, news
 
 ;; This file is part of SEMI (SEMI is Emacs MIME Interfaces).
@@ -35,7 +35,7 @@
 ;;;
 
 (defconst eword-encode-RCS-ID
-  "$Id: eword-encode.el,v 0.5 1997-02-22 17:05:55 morioka Exp $")
+  "$Id: eword-encode.el,v 0.6 1997-02-22 17:11:31 morioka Exp $")
 (defconst eword-encode-version (get-version-string eword-encode-RCS-ID))
 
 
@@ -526,7 +526,7 @@ when Subject field is encoded by `eword-encode-message-header'.")
        (car (tm-eword::encode-string 0 str))
        )))
 
-(defun eword-exist-encoded-word-in-subject ()
+(defun eword-in-subject-p ()
   (let ((str (std11-field-body "Subject")))
     (if (and str (string-match eword-encoded-word-regexp str))
        str)))
@@ -575,7 +575,7 @@ when Subject field is encoded by `eword-encode-message-header'.")
          ))
       (and eword-generate-X-Nsubject
           (or (std11-field-body "X-Nsubject")
-              (let ((str (eword-exist-encoded-word-in-subject)))
+              (let ((str (eword-in-subject-p)))
                 (if str
                     (progn
                       (setq str