[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Print out my key-sequences
|
From: |
Andrea Crotti |
|
Subject: |
Re: Print out my key-sequences |
|
Date: |
Tue, 01 Jun 2010 00:30:14 +0200 |
|
User-agent: |
Gnus/5.110011 (No Gnus v0.11) Emacs/23.2 (darwin) |
Kevin Rodgers <kevin.d.rodgers@gmail.com> writes:
> How about:
>
> (unless (= (length (this-command-keys-vector)) 1)
> ...)
>
> or:
>
> (unless (eq (lookup-key global-map (this-command-keys)) this-command)
> ...)
>
> or both:
>
> (unless (and (= (length (this-command-keys-vector)) 1)
> (eq (lookup-key global-map (this-command-keys)) this-command))
> ...)
Yes great looks very nice I'm just using the first version...
Where could that posted for a better visibility, I was looking for
something like that some time ago but with no luck.
Maybe on emacs-wiki or just on my blog or somewhere else?