mu4e-plist-put: add to existing keys

This commit is contained in:
Dirk-Jan C. Binnema
2025-05-08 09:25:17 +03:00
parent f725594636
commit e39e135e67

View File

@ -616,7 +616,7 @@ Returns the updated PLIST."
(defun mu4e-plist-put-many (plist &rest keyvals)
"Like `plist-put', but allow for multiple key-value pairs.
PLIST is a property list, and KEYVALS are key value ... ."
(let (p)
(let ((p plist))
(while keyvals
(setq p (plist-put p (car keyvals) (cadr keyvals)))
(setq keyvals (cddr keyvals)))