projects
/
elisp
/
semi.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
d439900
)
`mime/' -> `eword-'.
author
morioka
<morioka>
Sat, 22 Feb 1997 17:05:55 +0000
(17:05 +0000)
committer
morioka
<morioka>
Sat, 22 Feb 1997 17:05:55 +0000
(17:05 +0000)
eword-encode.el
patch
|
blob
|
history
diff --git
a/eword-encode.el
b/eword-encode.el
index
ddfa8c9
..
c08204b
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>
;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc.
;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;; 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).
;; 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
;;;
(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))
(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))
)))
(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")))
(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)
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")
))
(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
(if str
(progn
(setq str