trunk read-key-sequence bug

[Katsumi Yamaoka]

Hi,

To reproduce this bug, eval this form:

(let ((buffer (get-buffer-create "*testing*"))
      (keymap1 (make-sparse-keymap))
      (keymap2 (make-sparse-keymap)))
  (define-key keymap1 "a" keymap2)
  (pop-to-buffer buffer)
  (use-local-map keymap1)
  (read-key-sequence "01234567890123456789012345678901234567"))

Press the `a' key.  And then, after the first `a' appears in the
echo area, press the backspace key.  You will see:

(args-out-of-range "a backspace" 0 38)

The same error happens when I type `C-h c S' and then backspace
in the Gnus summary buffer.

Regards,