From 5732d8ee9a23900d697d76eac07db1ac89ba4fbf Mon Sep 17 00:00:00 2001
From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sun, 9 Aug 2020 12:52:02 +0200
Subject: [PATCH] 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 0aca31ac88a..61d9c602470 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)))
-- 
2.39.2