emacs-diffs
[Top][All Lists]
Advanced

[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)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]