From f37bad859712f36d7f901511b34e069ce25c2c08 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 22 Dec 1998 13:23:30 +0000 Subject: [PATCH] (ps-mule-begin-job): Programming uniformization. --- lisp/ps-mule.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/ps-mule.el b/lisp/ps-mule.el index 49dac6b89fb..c2a7e8867bc 100644 --- a/lisp/ps-mule.el +++ b/lisp/ps-mule.el @@ -1083,8 +1083,8 @@ This checks if all multi-byte characters in the region are printable or not." ;; Initialize `ps-mule-charset-list'. If some characters aren't ;; printable, warn it. (let ((charsets (find-charset-region from to))) - (setq charsets (delq 'ascii (delq 'unknown (delq nil charsets)))) - (setq ps-mule-charset-list charsets) + (setq charsets (delq 'ascii (delq 'unknown (delq nil charsets))) + ps-mule-charset-list charsets) (save-excursion (goto-char from) (and (search-forward "\200" to t) -- 2.39.2