From 2d0aa229c2c211e77a4e814d24b3672a0df971d0 Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Fri, 30 Jan 1998 11:05:41 +0000
Subject: [PATCH] (Fsubstitute_command_keys): Declare length_byte out of
 internal block.

---
 src/doc.c | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

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 \< */
-- 
2.39.5