From b266ae04d722c6ee06c62b949f7f3eba49788b14 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Tue, 14 Apr 1998 12:58:24 +0000 Subject: [PATCH] (Fwrite_region): Fix mixing of Lisp_Object and int. --- src/fileio.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/fileio.c b/src/fileio.c index 7a8ddff0f37..d49d107b9f4 100644 --- a/src/fileio.c +++ b/src/fileio.c @@ -4030,7 +4030,7 @@ to the file, instead of any buffer contents, and END is ignored.") ? 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); -- 2.39.2