mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-02-05 20:43:08 +00:00
2005-09-13 Chong Yidong <cyd@stupidchicken.com>
* url-mailto.el (url-mailto): Always use a new mail buffer.
This commit is contained in:
parent
09c9e6bbb9
commit
c8359e8fd5
@ -1,3 +1,7 @@
|
||||
2005-09-13 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* url-mailto.el (url-mailto): Always use a new mail buffer.
|
||||
|
||||
2005-09-01 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* url-util.el (url-parse-query-string): New optional argument
|
||||
|
@ -92,7 +92,7 @@
|
||||
(setq args (cons (list "to" to) args))))
|
||||
|
||||
(setq subject (cdr-safe (assoc "subject" args)))
|
||||
(if (fboundp url-mail-command) (funcall url-mail-command) (mail))
|
||||
(if (fboundp url-mail-command) (funcall url-mail-command) (mail 'new))
|
||||
(while args
|
||||
(if (string= (caar args) "body")
|
||||
(progn
|
||||
|
Loading…
x
Reference in New Issue
Block a user