, .
(require 'keylist), .emacs .
,
(not cursor-in-echo-area)
(not (minibufferp))
(not (= 13 (aref (this-command-keys-vector) 0)))
, .
, , - -.
C-x C-c , cursor-in-echo-area .
The last line (= 13 (aref (this-command-keys-vector) 0))is the funniest. It is used to trap things like query-replace. When creating a rank (this-command-keys-vector), it shows that it RETis the first key pressed, then the keys of your choice (y, n). Since I don't have key sequences starting with RET, I'm fine with that.
source
share