1 files changed, 1 insertions, 1 deletions

diff --git a/src/charset.c b/src/charset.c
index 65c95121514..05dc94acb0e 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -2011,7 +2011,7 @@ usage: (set-charset-priority &rest charsets)  */)
   for (old_list = Vcharset_ordered_list, new_head = Qnil;
        CONSP (old_list); old_list = XCDR (old_list))
     {
-      if (Fmemq (XCAR (old_list), Viso_2022_charset_list))
+      if (! NILP (Fmemq (XCAR (old_list), Viso_2022_charset_list)))
         new_head = Fcons (XCAR (old_list), new_head);
     }
   Viso_2022_charset_list = Fnreverse (new_head);