# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1144891506 0
# Node ID d5629ae481f1ee97836457f7dba1cd1cc310613e
# Parent  585153d158468b0af70fb6cad94c18ad41bb21ee
(read_key_sequence): Explicitly avoid keybuf[-1].

diff -r 585153d15846 -r d5629ae481f1 src/keyboard.c
--- a/src/keyboard.c	Thu Apr 13 01:21:48 2006 +0000
+++ b/src/keyboard.c	Thu Apr 13 01:25:06 2006 +0000
@@ -1418,7 +1418,7 @@
   Lisp_Object keybuf[30];
   int i;
   int no_direct;
-  int prev_modiff;
+  int prev_modiff = 0;
   struct buffer *prev_buffer = NULL;
 #ifdef MULTI_KBOARD
   int was_locked = single_kboard;
@@ -9479,6 +9479,7 @@
   /* Don't downcase the last character if the caller says don't.
      Don't downcase it if the result is undefined, either.  */
   if ((dont_downcase_last || first_binding >= nmaps)
+      && t > 0
       && t - 1 == original_uppercase_position)
     keybuf[t - 1] = original_uppercase;