Mercurial > emacs

diff src/coding.c @ 46839:4acadb428f41

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Ffind_operation_coding_system): Fix Lisp_Object/int mixup.
author Ken Raeburn <raeburn@raeburn.org>
date Thu, 08 Aug 2002 16:59:15 +0000
parents 395572099269
children a26dd8891732
line wrap: on
line diff
--- a/src/coding.c	Thu Aug 08 12:34:27 2002 +0000
+++ b/src/coding.c	Thu Aug 08 16:59:15 2002 +0000
@@ -6884,7 +6884,7 @@
   if (EQ (operation, Qwrite_region)
       && nargs > 5
       && STRINGP (args[5]))
-    target_idx = 4;
+    target_idx = make_number (4);
   target = args[XINT (target_idx) + 1];
   if (!(STRINGP (target)
 	|| (EQ (operation, Qopen_network_stream) && INTEGERP (target))))