Commit f1c980a9 authored by Eric Abrahamsen's avatar Eric Abrahamsen

Preserve group name encoding in newsrc.eld files

* lisp/gnus/gnus-start.el (gnus-gnus-to-quick-newsrc-format): Preserve
  Gnus' earlier odd encoding of group names. Don't change any file
  formats until it's time to release a new Gnus version.
parent 548c778e
Pipeline #1915 failed with stage
in 3 seconds
......@@ -2887,7 +2887,19 @@ SPECIFIC-VARIABLES, or those in `gnus-variable-list'."
(set (nth (seq-position gnus-variable-list 'gnus-newsrc-alist)
gnus-variable-list)
(mapcar (lambda (g)
(nth 1 (gethash g gnus-newsrc-hashtb)))
(let ((entry (copy-sequence
(nth 1 (gethash g gnus-newsrc-hashtb)))))
;; Encode in order to keep newsrc.eld files
;; compatible with older versions of Gnus. At
;; some point, if/when a new version of Gnus is
;; released, drop this (and the corresponding
;; decode in
;; `gnus-make-hashtable-from-newsrc-alist').
(setf (car entry)
(encode-coding-string
(car entry)
'utf-8-emacs))
entry))
(delete "dummy.group" gnus-group-list)))
;; Insert the variables into the file.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment