From 8000e212ef3cefdf190624c9607def66bda2bf8a Mon Sep 17 00:00:00 2001 From: Ken Raeburn Date: Sat, 8 Apr 2000 19:34:29 +0000 Subject: [PATCH] * coding.h (code_convert_string): Declare. * coding.c (code_convert_string_norecord): Pass an int, not a lisp object, as the fourth argument to code_convert_string. --- src/coding.c | 2 +- src/coding.h | 2 ++ 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/src/coding.c b/src/coding.c index fcd5e89e004..92e5af8b390 100644 --- a/src/coding.c +++ b/src/coding.c @@ -5654,7 +5654,7 @@ code_convert_string_norecord (string, coding_system, encodep) coding.composing = COMPOSITION_DISABLED; coding.mode |= CODING_MODE_LAST_BLOCK; - return code_convert_string (string, &coding, encodep, Qt); + return code_convert_string (string, &coding, encodep, 1); } DEFUN ("decode-sjis-char", Fdecode_sjis_char, Sdecode_sjis_char, 1, 1, 0, diff --git a/src/coding.h b/src/coding.h index d226d433a0a..12c14da4d02 100644 --- a/src/coding.h +++ b/src/coding.h @@ -597,6 +597,8 @@ extern int conversion_buffer_size; extern char *conversion_buffer; extern char *get_conversion_buffer P_ ((int)); extern int setup_coding_system P_ ((Lisp_Object, struct coding_system *)); +extern Lisp_Object code_convert_string P_ ((Lisp_Object, + struct coding_system *, int, int)); extern void setup_raw_text_coding_system P_ ((struct coding_system *)); extern Lisp_Object Qcoding_system, Qeol_type, Qcoding_category_index; extern Lisp_Object Qraw_text, Qemacs_mule;