From 4367c296cead5540acf7804b1b7423d7fe649e53 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Mon, 28 Oct 2019 15:10:51 +0100 Subject: [PATCH] Fix `G c' in Gnus group buffers for non-ASCII text * lisp/gnus/gnus-cus.el (gnus-group-customize): Decoding is superfluous here -- everything is utf-8 already. (gnus-group-customize-done): Don't double-encode the text (bug#37901). --- lisp/gnus/gnus-cus.el | 9 --------- 1 file changed, 9 deletions(-) diff --git a/lisp/gnus/gnus-cus.el b/lisp/gnus/gnus-cus.el index 2e3fbfe9d46..5291d1d64d1 100644 --- a/lisp/gnus/gnus-cus.el +++ b/lisp/gnus/gnus-cus.el @@ -421,11 +421,6 @@ category.")) (delq elem tmp)) (setq tmp (cdr tmp)))) - ;; Decode values posting-style holds. - (dolist (style (cdr (assq 'posting-style values))) - (when (stringp (cadr style)) - (setcdr style (list (decode-coding-string (cadr style) 'utf-8))))) - (setq gnus-custom-params (apply 'widget-create 'group :value values @@ -497,10 +492,6 @@ form, but who cares?" "Apply changes and bury the buffer." (interactive) (let ((params (widget-value gnus-custom-params))) - ;; Encode values posting-style holds. - (dolist (style (cdr (assq 'posting-style params))) - (when (stringp (cadr style)) - (setcdr style (list (encode-coding-string (cadr style) 'utf-8))))) (if gnus-custom-topic (gnus-topic-set-parameters gnus-custom-topic params) (gnus-group-edit-group-done 'params gnus-custom-group params) -- 2.39.5