diff options
author | Alex Bochannek <alex@bochannek.com> | 2021-05-28 01:19:38 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-05-28 01:19:38 +0200 |
commit | 327accb38f47d3a0903cf9a0d24d7d2bcbbec098 (patch) | |
tree | d7ffd85f9c733444620ca22e9b030eb0903bd832 | |
parent | 24c96577465db02ddbe5df1be160c5fbe60b66fd (diff) | |
download | emacs-327accb38f47d3a0903cf9a0d24d7d2bcbbec098.tar.gz emacs-327accb38f47d3a0903cf9a0d24d7d2bcbbec098.tar.bz2 emacs-327accb38f47d3a0903cf9a0d24d7d2bcbbec098.zip |
Fix nnimap lexical conversion problem
* lisp/gnus/nnimap.el (nnimap-process-expiry-targets): Fix problem
introduced when converting to lexical binding -- `set' alters the
dynamic value (bug#48577).
-rw-r--r-- | lisp/gnus/nnimap.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index 570be49094f..f869f586d94 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el @@ -1076,7 +1076,9 @@ during splitting, which may be slow." "UID COPY %s %S") (nnimap-article-ranges (gnus-compress-sequence articles)) (nnimap-group-to-imap (gnus-group-real-name nnmail-expiry-target))) - (set (if can-move 'deleted-articles 'articles-to-delete) articles)))) + (if can-move + (setq deleted-articles articles) + (setq articles-to-delete articles))))) t) (t (dolist (article articles) |