projects
/
elisp
/
tm.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
e3f524f
)
tm 7.74.
author
morioka
<morioka>
Mon, 9 Mar 1998 19:42:47 +0000
(19:42 +0000)
committer
morioka
<morioka>
Mon, 9 Mar 1998 19:42:47 +0000
(19:42 +0000)
ChangeLog
patch
|
blob
|
history
Makefile
patch
|
blob
|
history
tm-edit.el
patch
|
blob
|
history
diff --git
a/ChangeLog
b/ChangeLog
index
7c093c4
..
d33bfa2
100644
(file)
--- a/
ChangeLog
+++ b/
ChangeLog
@@
-1,3
+1,14
@@
+Wed Jul 24 10:33:16 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * tm: Version 7.74 was released.
+
+Wed Jul 24 10:27:07 1996 Katsumi Yamaoka <yamaoka@ga.sony.co.jp>
+
+ * tm-edit.el (mime-editor/encrypt-pgp-elkins): fixed to call
+ `rfc822/get-field-body' with `mail-header-separator'.
+ (cf. [tm-ja:1996])
+
+
\f
Wed Jul 24 10:08:38 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
* tl: Version 7.43.1 was released.
Wed Jul 24 10:08:38 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
* tl: Version 7.43.1 was released.
diff --git
a/Makefile
b/Makefile
index
16cc42e
..
0c3016c
100644
(file)
--- a/
Makefile
+++ b/
Makefile
@@
-48,7
+48,7
@@
TL_FILES = tl/README.en tl/Makefile tl/mk-tl tl/tl-els \
FILES = $(TM_FILES) $(TM_MUA_FILES) $(MEL_FILES) $(TL_FILES)
FILES = $(TM_FILES) $(TM_MUA_FILES) $(MEL_FILES) $(TL_FILES)
-TARFILE = tm7.73.tar.gz
+TARFILE = tm7.74.tar.gz
elc:
$(EMACS) $(FLAGS) -l inst-tm -f compile-tm
elc:
$(EMACS) $(FLAGS) -l inst-tm -f compile-tm
diff --git
a/tm-edit.el
b/tm-edit.el
index
2852cb7
..
278853d
100644
(file)
--- a/
tm-edit.el
+++ b/
tm-edit.el
@@
-8,7
+8,7
@@
;;; MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;; Created: 1994/08/21 renamed from mime.el
;;; MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;; Maintainer: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;; Created: 1994/08/21 renamed from mime.el
-;;; Version: $Revision: 7.73 $
+;;; Version: $Revision: 7.74 $
;;; Keywords: mail, news, MIME, multimedia, multilingual
;;;
;;; This file is part of tm (Tools for MIME).
;;; Keywords: mail, news, MIME, multimedia, multilingual
;;;
;;; This file is part of tm (Tools for MIME).
@@
-122,7
+122,7
@@
;;;
(defconst mime-editor/RCS-ID
;;;
(defconst mime-editor/RCS-ID
- "$Id: tm-edit.el,v 7.73 1996/07/22 19:29:42 morioka Exp $")
+ "$Id: tm-edit.el,v 7.74 1996/07/24 10:27:07 morioka Exp $")
(defconst mime-editor/version (get-version-string mime-editor/RCS-ID))
(defconst mime-editor/version (get-version-string mime-editor/RCS-ID))
@@
-1687,9
+1687,9
@@
Content-Transfer-Encoding: 7bit
(defun mime-editor/encrypt-pgp-elkins (beg end boundary)
(save-excursion
(save-restriction
(defun mime-editor/encrypt-pgp-elkins (beg end boundary)
(save-excursion
(save-restriction
- (let ((from (rfc822/get-field-body "From"))
- (to (rfc822/get-field-body "To"))
- (cc (rfc822/get-field-body "cc"))
+ (let ((from (rfc822/get-field-body "From" mail-header-separator))
+ (to (rfc822/get-field-body "To" mail-header-separator))
+ (cc (rfc822/get-field-body "cc" mail-header-separator))
recipients)
(narrow-to-region beg end)
(let* ((ret
recipients)
(narrow-to-region beg end)
(let* ((ret