[nongnu] elpa/vm 3535485061 08/20: vm-imap|pop.el (vm-expunge-imap|pop-messages): Fix misuse of `nreverse`

[ELPA Syncer]

branch: elpa/vm
commit 35354850611192e68ddf29b12fb5e9b9e7d4a4b5
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    vm-imap|pop.el (vm-expunge-imap|pop-messages): Fix misuse of `nreverse`
---
 lisp/vm-imap.el | 2 +-
 lisp/vm-pop.el  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/vm-imap.el b/lisp/vm-imap.el
index 0747439ad0..38730bdca3 100644
--- a/lisp/vm-imap.el
+++ b/lisp/vm-imap.el
@@ -940,7 +940,7 @@ on all the relevant IMAP servers and then immediately 
expunges."
                                (if (zerop delete-count) "No" delete-count)
                                (if (= delete-count 1) "" "s")))
                (insert "VM had problems expunging messages from:\n")
-               (nreverse trouble)
+               (setq trouble (nreverse trouble))
                (setq mp trouble)
                (while mp
                  (insert "   " (car mp) "\n")
diff --git a/lisp/vm-pop.el b/lisp/vm-pop.el
index 20758e130e..cb0cf3b404 100644
--- a/lisp/vm-pop.el
+++ b/lisp/vm-pop.el
@@ -410,7 +410,7 @@ relevant POP servers to remove the messages."
                                (if (zerop delete-count) "No" delete-count)
                                (if (= delete-count 1) "" "s")))
                (insert "VM had problems expunging messages from:\n")
-               (nreverse trouble)
+               (setq trouble (nreverse trouble))
                (setq mp trouble)
                (while mp
                  (insert "   " (car mp) "\n")