From: morioka Date: Sat, 22 Feb 1997 17:05:55 +0000 (+0000) Subject: `mime/' -> `eword-'. X-Git-Tag: Hokutetsu-Ishikawa-new~334 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b696845c1bd4237010f244c3ef2cf08f870e8f9c;p=elisp%2Fsemi.git `mime/' -> `eword-'. --- diff --git a/eword-encode.el b/eword-encode.el index ddfa8c9..c08204b 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 -;; Version: $Revision: 0.4 $ +;; Version: $Revision: 0.5 $ ;; 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.4 1997-02-22 17:04:26 morioka Exp $") + "$Id: eword-encode.el,v 0.5 1997-02-22 17:05:55 morioka Exp $") (defconst eword-encode-version (get-version-string eword-encode-RCS-ID)) @@ -526,9 +526,9 @@ when Subject field is encoded by `eword-encode-message-header'.") (car (tm-eword::encode-string 0 str)) ))) -(defun mime/exist-encoded-word-in-subject () +(defun eword-exist-encoded-word-in-subject () (let ((str (std11-field-body "Subject"))) - (if (and str (string-match mime/encoded-word-regexp str)) + (if (and str (string-match eword-encoded-word-regexp str)) str))) (defun eword-encode-message-header (&optional code-conversion) @@ -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 (mime/exist-encoded-word-in-subject))) + (let ((str (eword-exist-encoded-word-in-subject))) (if str (progn (setq str