changeset 23430:0ab3d33ffd29

(find-coding-systems-for-charsets): Delete `composition' (if any) from CHARSETS.
author Kenichi Handa <handa@m17n.org>
date Mon, 12 Oct 1998 12:00:44 +0000
parents a3b20bea408f
children 9aad69351f7b
files lisp/international/mule-cmds.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Mon Oct 12 12:00:44 1998 +0000
+++ b/lisp/international/mule-cmds.el	Mon Oct 12 12:00:44 1998 +0000
@@ -289,6 +289,7 @@
 	  (and (= (length charsets) 1)
 	       (eq 'ascii (car charsets))))
       '(undecided)
+    (setq charsets (delq 'composition charsets))
     (let ((l coding-system-list)
 	  (charset-prefered-codings
 	   (mapcar (function