diff options
| author | Andreas Schwab | 2021-01-07 13:20:43 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-01-07 13:20:43 +0100 |
| commit | e15386da5d684b1d64204db6b33fbf613cbaad50 (patch) | |
| tree | 8741a3237dc03c235ee9071157cfce15a827d02d | |
| parent | 2f6e30cd86a575ef06e8d056fbb6582336f6aadd (diff) | |
| download | emacs-e15386da5d684b1d64204db6b33fbf613cbaad50.tar.gz emacs-e15386da5d684b1d64204db6b33fbf613cbaad50.zip | |
Fix quoting problem in pop3-uidl-save
* lisp/net/pop3.el (pop3-uidl-save): Quote strings properly
(bug#43896).
| -rw-r--r-- | lisp/net/pop3.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/net/pop3.el b/lisp/net/pop3.el index aa34fe7f1a3..dcac36f2a4a 100644 --- a/lisp/net/pop3.el +++ b/lisp/net/pop3.el | |||
| @@ -463,7 +463,7 @@ Return non-nil if it is necessary to update the local UIDL file." | |||
| 463 | (when (cdr elt) | 463 | (when (cdr elt) |
| 464 | (insert "(\"" (pop elt) "\"\n ") | 464 | (insert "(\"" (pop elt) "\"\n ") |
| 465 | (while elt | 465 | (while elt |
| 466 | (insert (format "\"%s\" %s\n " (pop elt) (pop elt)))) | 466 | (insert (format "%S %s\n " (pop elt) (pop elt)))) |
| 467 | (delete-char -4) | 467 | (delete-char -4) |
| 468 | (insert ")\n "))) | 468 | (insert ")\n "))) |
| 469 | (delete-char -3) | 469 | (delete-char -3) |