[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 5732d8e 1/3: Slight code clean-up in message-mailto
From: |
Lars Ingebrigtsen |
Subject: |
master 5732d8e 1/3: Slight code clean-up in message-mailto |
Date: |
Sun, 9 Aug 2020 07:05:47 -0400 (EDT) |
branch: master
commit 5732d8ee9a23900d697d76eac07db1ac89ba4fbf
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Slight code clean-up in message-mailto
* lisp/gnus/message.el (message-mailto): Clean up code slightly.
---
lisp/gnus/message.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 0aca31a..61d9c60 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -8817,8 +8817,7 @@ will then start up Emacs ready to compose mail."
(interactive)
;; <a
href="mailto:someone@example.com?subject=This%20is%20the%20subject&cc=someone_else@example.com&body=This%20is%20the%20body">Send
email</a>
(message-mail)
- (message-mailto-1 (car command-line-args-left))
- (setq command-line-args-left (cdr command-line-args-left)))
+ (message-mailto-1 (pop command-line-args-left)))
(defun message-mailto-1 (url)
(let ((args (message-parse-mailto-url url)))