>>755
どうも Emacs の中の問題のような…?

うちは Emacs 23.1.50.1 です。これが最小の再現例だと思います。
下を eval して a連打していると "aabbbbbbbbb" のようになりますね。
他のバージョンだとどうでしょうか?
(progn
(keyboard-translate ?a ?b)
(keyboard-translate ?b ?a)
(setq my-test-timer (run-with-idle-timer 0.1
t
(lambda ()
(let ((repeat t))
(while repeat
(setq repeat (sit-for 0.1))))))))

もとにもどす時はこちらを eval
(progn
(keyboard-translate ?a nil)
(keyboard-translate ?b nil)
(when my-test-timer
(cancel-timer my-test-timer)
(setq my-test-timer nil)))