Mercurial > emacs

changeset 21839:376ce06ab12d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(setup_coding_system): Properly check for nil.
author Andreas Schwab <schwab@suse.de>
date Wed, 29 Apr 1998 09:33:53 +0000
parents 1d93b782b983
children 89d03805f45a
files src/coding.c
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/src/coding.c	Wed Apr 29 09:23:15 1998 +0000
+++ b/src/coding.c	Wed Apr 29 09:33:53 1998 +0000
@@ -3050,10 +3050,10 @@
 	if (CONSP  (val)
 	    && SYMBOLP (XCONS (val)->car)
 	    && !NILP (decoder = Fget (XCONS (val)->car, Qccl_program_idx))
-	    && (decoder = Fcdr (Faref (Vccl_program_table, decoder)))
+	    && !NILP (decoder = Fcdr (Faref (Vccl_program_table, decoder)))
 	    && SYMBOLP (XCONS (val)->cdr)
 	    && !NILP (encoder = Fget (XCONS (val)->cdr, Qccl_program_idx))
-	    && (encoder = Fcdr (Faref (Vccl_program_table, encoder))))
+	    && !NILP (encoder = Fcdr (Faref (Vccl_program_table, encoder))))
 	  {
 	    setup_ccl_program (&(coding->spec.ccl.decoder), decoder);
 	    setup_ccl_program (&(coding->spec.ccl.encoder), encoder);