From 2a17b6388c03ede6bacafc7db3314e28317134a1 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 12 Oct 1998 12:00:44 +0000 Subject: [PATCH] (find-coding-systems-for-charsets): Delete `composition' (if any) from CHARSETS. --- lisp/international/mule-cmds.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 266ad0c83f2..34fff500454 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -289,6 +289,7 @@ CHARSETS is a list of character sets." (and (= (length charsets) 1) (eq 'ascii (car charsets)))) '(undecided) + (setq charsets (delq 'composition charsets)) (let ((l coding-system-list) (charset-prefered-codings (mapcar (function -- 2.39.2