unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
From: Simon Josefsson <jas@extundo.com>
Cc: Emacs-Devel ' <emacs-devel@gnu.org>
Subject: Re: patch to mailclient + sendmail
Date: Sun, 21 May 2006 17:31:49 +0200	[thread overview]
Message-ID: <877j4fe6my.fsf@latte.josefsson.org> (raw)
In-Reply-To: <CDF5300C-1766-49FD-A04E-8FF1FD90DCE3@gmail.com> (David Reitter's message of "Fri, 21 Apr 2006 17:32:17 +0100")

David Reitter <david.reitter@gmail.com> writes:

> This patch to mailclient.el will print an informative message and
> improve the short message body that is included by default on Windows
> systems.

Is it really reliable to assume messages are shown to the user?  What
about displaying the information and making it a "Continue (y/n)"
question?

>
>
>
> *** lisp/mail/mailclient.el	22 Feb 2006 19:15:36 +0000	1.4
> --- lisp/mail/mailclient.el	21 Apr 2006 17:11:03 +0100	
> ***************
> *** 162,172 ****
>   		    (progn
>   		      (clipboard-kill-ring-save
>   		       (+ 1 delimline) (point-max))
> ! 		      (concat
> ! 		       "*** E-Mail body has been placed on clipboard, "
> ! 		       "please paste them here! ***"))
>   		  ;; else
> ! 		  (buffer-substring (+ 1 delimline) (point-max))))))))))))
>
>   (provide 'mailclient)
>
> --- 162,173 ----
>   		    (progn
>   		      (clipboard-kill-ring-save
>   		       (+ 1 delimline) (point-max))
> ! "*** E-Mail body has been placed on clipboard, please paste it here!
> ! Customize `mailclient-place-body-on-clipboard-flag' to avoid this
> step. ***")
>   		  ;; else
> ! 		  (buffer-substring (+ 1 delimline) (point-max)))))))
> ! 	    (message
> ! 	     "Message will be handled by system's default mail client."))))))
>
>   (provide 'mailclient)
>
> *** lisp/mail/sendmail.el	21 Apr 2006 17:12:35 +0100	1.302
> --- lisp/mail/sendmail.el	21 Apr 2006 17:12:41 +0100	
> ***************
> *** 879,885 ****
>   		     (cdr (car mail-send-actions)))
>   	    (error))
>   	  (setq mail-send-actions (cdr mail-send-actions)))
> ! 	(message "Sending...done")
>   	;; If buffer has no file, mark it as unmodified and delete
> auto-
> save.
>   	(if (not buffer-file-name)
>   	    (progn
> --- 879,887 ----
>   		     (cdr (car mail-send-actions)))
>   	    (error))
>   	  (setq mail-send-actions (cdr mail-send-actions)))
> ! 	(if (equal (current-message) "Sending...")
> ! 	    ;; allow send-mail-function to show its own message
> ! 	    (message "Sending...done"))
>   	;; If buffer has no file, mark it as unmodified and delete
> auto-
> save.
>   	(if (not buffer-file-name)
>   	    (progn

  reply	other threads:[~2006-05-21 15:31 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2006-04-21 16:32 patch to mailclient + sendmail David Reitter
2006-05-21 15:31 ` Simon Josefsson [this message]
2006-05-21 15:55 ` Jason Rumney

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=877j4fe6my.fsf@latte.josefsson.org \
    --to=jas@extundo.com \
    --cc=emacs-devel@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).