projects
/
elisp
/
tm.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
tm 7.105.2.
[elisp/tm.git]
/
tm-rmail.el
diff --git
a/tm-rmail.el
b/tm-rmail.el
index
98b2415
..
24f4971
100644
(file)
--- a/
tm-rmail.el
+++ b/
tm-rmail.el
@@
-1,12
+1,12
@@
;;;
;;; Copyright (C) 1995 Free Software Foundation, Inc.
;;;
;;; Copyright (C) 1995 Free Software Foundation, Inc.
-;;; Copyright (C) 1994,1995 MORIOKA Tomohiko
+;;; Copyright (C) 1994 .. 1996 MORIOKA Tomohiko
;;;
;;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
;;;
;;; Author: MORIOKA Tomohiko <morioka@jaist.ac.jp>
-;;; modified by KOBAYASHI Shuhei <shuhei@cmpt01.phys.tohoku.ac.jp>
+;;; modified by KOBAYASHI Shuhei <shuhei-k@jaist.ac.jp>
;;; Created: 1994/8/30
;;; Version:
;;; Created: 1994/8/30
;;; Version:
-;;; $Revision: 7.22 $
+;;; $Revision: 7.25 $
;;; Keywords: mail, MIME, multimedia, multilingual, encoded-word
;;;
;;; This file is part of tm (Tools for MIME).
;;; Keywords: mail, MIME, multimedia, multilingual, encoded-word
;;;
;;; This file is part of tm (Tools for MIME).
@@
-40,7
+40,7
@@
;;;
(defconst tm-rmail/RCS-ID
;;;
(defconst tm-rmail/RCS-ID
- "$Id: tm-rmail.el,v 7.22 1995/12/25 09:08:50 morioka Exp $")
+ "$Id: tm-rmail.el,v 7.25 1996/06/12 05:38:23 morioka Exp $")
(defconst tm-rmail/version (get-version-string tm-rmail/RCS-ID))
(defvar tm-rmail/decode-all nil)
(defconst tm-rmail/version (get-version-string tm-rmail/RCS-ID))
(defvar tm-rmail/decode-all nil)
@@
-357,13
+357,32
@@
GNUS. The message will be appended if being composed."
(require 'tm-mail)
(set-alist 'mime-editor/message-inserter-alist
'mail-mode (function tm-mail/insert-message))
(require 'tm-mail)
(set-alist 'mime-editor/message-inserter-alist
'mail-mode (function tm-mail/insert-message))
+ (set-alist 'mime-editor/split-message-sender-alist
+ 'mail-mode (function
+ (lambda ()
+ (interactive)
+ (sendmail-send-it)
+ )))
)))
)))
)))
)))
+;;; @ for BBDB
+;;;
+
+(call-after-loaded
+ 'bbdb
+ (function
+ (lambda ()
+ (require 'tm-bbdb)
+ )))
+
+
;;; @ end
;;;
(provide 'tm-rmail)
(run-hooks 'tm-rmail-load-hook)
;;; @ end
;;;
(provide 'tm-rmail)
(run-hooks 'tm-rmail-load-hook)
+
+;;; tm-rmail.el ends here.