Mercurial > emacs

comparison lisp/=gnusmail.el @ 584:4cd7543be581

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Jim Blandy <jimb@redhat.com>
date Mon, 16 Mar 1992 20:39:07 +0000
parents d3e764a552a5
children 08eb386dd0f3
comparison
equal deleted inserted replaced
583:3c0c1cd8428a 584:4cd7543be581
17 ;; supposed to have been given to you along with GNU Emacs so you 17 ;; supposed to have been given to you along with GNU Emacs so you
18 ;; can know your rights and responsibilities. It should be in a 18 ;; can know your rights and responsibilities. It should be in a
19 ;; file named COPYING. Among other things, the copyright notice 19 ;; file named COPYING. Among other things, the copyright notice
20 ;; and this notice must be preserved on all copies. 20 ;; and this notice must be preserved on all copies.
21 21
22 (provide 'gnusmail)
23 (require 'gnus) 22 (require 'gnus)
24 23
25 ;; Provides mail reply and mail other window command using usual mail 24 ;; Provides mail reply and mail other window command using usual mail
26 ;; interface and mh-e interface. 25 ;; interface and mh-e interface.
27 ;; 26 ;;
144 (setq mh-show-buffer (current-buffer)) 143 (setq mh-show-buffer (current-buffer))
145 (mh-find-path) 144 (mh-find-path)
146 (mh-send-other-window to cc subject) 145 (mh-send-other-window to cc subject)
147 (setq mh-sent-from-folder (current-buffer)) 146 (setq mh-sent-from-folder (current-buffer))
148 (setq mh-sent-from-msg 1))) 147 (setq mh-sent-from-msg 1)))
148
149 (provide 'gnusmail)