changeset 21522:48def841655f

(Fwrite_region): Fix mixing of Lisp_Object and int.
author Andreas Schwab <schwab@suse.de>
date Tue, 14 Apr 1998 12:58:24 +0000
parents 354a7085f1d7
children 33d800bf97c3
files src/fileio.c
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/fileio.c	Tue Apr 14 12:56:53 1998 +0000
+++ b/src/fileio.c	Tue Apr 14 12:58:24 1998 +0000
@@ -4030,7 +4030,7 @@
 	       ? XCONS (coding_systems)->cdr
 	       : current_buffer->buffer_file_coding_system);
 	/* Confirm that VAL can surely encode the current region.  */
-	if (Ffboundp (Vselect_safe_coding_system_function))
+	if (!NILP (Ffboundp (Vselect_safe_coding_system_function)))
 	  val = call3 (Vselect_safe_coding_system_function, start, end, val);
       }
     setup_coding_system (Fcheck_coding_system (val), &coding);