From: Kenichi Handa <handa@m17n.org>
Date: Fri, 30 Jan 1998 11:05:41 +0000 (+0000)
Subject: (Fsubstitute_command_keys): Declare length_byte out of
X-Git-Tag: emacs-20.3~2272
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2d0aa229c2c211e77a4e814d24b3672a0df971d0;p=emacs.git

(Fsubstitute_command_keys): Declare length_byte out of
internal block.
---

diff --git a/src/doc.c b/src/doc.c
index c3888b729aa..adc4529e894 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -536,7 +536,7 @@ thus, \\=\\=\\=\\= puts \\=\\= into the output, and \\=\\=\\=\\[ puts \\=\\[ int
   Lisp_Object tem;
   Lisp_Object keymap;
   unsigned char *start;
-  int length;
+  int length, length_byte;
   Lisp_Object name;
   struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
   int multibyte;
@@ -594,7 +594,6 @@ thus, \\=\\=\\=\\= puts \\=\\= into the output, and \\=\\=\\=\\[ puts \\=\\[ int
       else if (strp[0] == '\\' && strp[1] == '[')
 	{
 	  Lisp_Object firstkey;
-	  int length_byte;
 
 	  changed = 1;
 	  strp += 2;		/* skip \[ */
@@ -648,7 +647,6 @@ thus, \\=\\=\\=\\= puts \\=\\= into the output, and \\=\\=\\=\\[ puts \\=\\[ int
       else if (strp[0] == '\\' && (strp[1] == '{' || strp[1] == '<'))
 	{
 	  struct buffer *oldbuf;
-	  int length_byte;
 
 	  changed = 1;
 	  strp += 2;		/* skip \{ or \< */