Re: C-q vs documentation

[Stefan Monnier]

> Does this patch fix it?
> 
> *** subr.el.~1.344.~  Mon Mar 17 13:59:36 2003
> --- subr.el   Sat Mar 22 09:03:07 2003
> ***************
> *** 1112,1118 ****
>                (setq char (aref translated 0)))))
>         (cond ((null char))
>           ((not (integerp char))
> !          (setq unread-command-events (listify-key-sequence 
> (this-single-command-raw-keys))
>                  done t))
>           ((/= (logand char ?\M-\^@) 0)
>            ;; Turn a meta-character into a character with the 0200 bit set.
> --- 1112,1118 ----
>                (setq char (aref translated 0)))))
>         (cond ((null char))
>           ((not (integerp char))
> !          (setq unread-command-events (list char)
>                  done t))
>           ((/= (logand char ?\M-\^@) 0)
>            ;; Turn a meta-character into a character with the 0200 bit set.

The reason why I used this-single-command-raw-keys is because CHAR has
already been through key-translation-map, so pushing it back onto
the unread-command-events will cause it to go through key-translation-map
a second time, which can result in incorrect results.
E.g. if you use key-translation-map to switch two keys.


        Stefan