From 753b4645a70fb09c9cb3b0f3f4cb426da00ca8d6 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 18 Jun 2001 12:38:38 +0000 Subject: [PATCH] (quoted-printable-decode-region): If called interactively, use coding-system-for-read. --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/qp.el | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index ef8de291082..8368c4da7b0 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2001-06-18 Eli Zaretskii + + * qp.el (quoted-printable-decode-region): If called interactively, + use coding-system-for-read. + 2001-03-30 Gerd Moellmann * gnus.el (gnus-interactive): Fix parenthesis errors. diff --git a/lisp/gnus/qp.el b/lisp/gnus/qp.el index d4fb5152fe1..e7bff13b918 100644 --- a/lisp/gnus/qp.el +++ b/lisp/gnus/qp.el @@ -36,7 +36,9 @@ "Decode quoted-printable in the region between FROM and TO, per RFC 2045. If CODING-SYSTEM is non-nil, decode bytes into characters with that coding-system." - (interactive "r") + (interactive + ;; Let the user determine the coding system with "C-x RET c". + (list (region-beginning) (region-end) coding-system-for-read)) (unless (mm-coding-system-p coding-system) ; e.g. `ascii' from Gnus (setq coding-system nil)) (save-excursion -- 2.39.2