X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=tm-rmail.el;h=24f4971e1cb3f57d42ffce8a6b1117f393f51be1;hb=cd47eed235f4258380f6d9b401c2fb1fc884931c;hp=d6a40b64962b9eed138b4e7ea7401f8b4909042a;hpb=1e5992c4313da6a0fc541379554164ab9467cdbe;p=elisp%2Ftm.git diff --git a/tm-rmail.el b/tm-rmail.el index d6a40b6..24f4971 100644 --- a/tm-rmail.el +++ b/tm-rmail.el @@ -1,12 +1,12 @@ ;;; ;;; Copyright (C) 1995 Free Software Foundation, Inc. -;;; Copyright (C) 1994,1995 MORIOKA Tomohiko +;;; Copyright (C) 1994 .. 1996 MORIOKA Tomohiko ;;; ;;; Author: MORIOKA Tomohiko ;;; modified by KOBAYASHI Shuhei ;;; Created: 1994/8/30 ;;; Version: -;;; $Revision: 7.24 $ +;;; $Revision: 7.25 $ ;;; 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 - "$Id: tm-rmail.el,v 7.24 1996/04/16 18:24:58 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) @@ -357,6 +357,12 @@ 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)) + (set-alist 'mime-editor/split-message-sender-alist + 'mail-mode (function + (lambda () + (interactive) + (sendmail-send-it) + ))) ))) )))