[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Reporting when keymapping stomped... best approach

From: Grant Rettke
Subject: Reporting when keymapping stomped... best approach
Date: Tue, 10 Jun 2014 14:15:29 -0500

Good afternoon,

My goal is to issue a warning whenever a keymapping is stomped on my
myself or anyone else. For example, say I replace self-insert for 1
like this:

(global-set-key (kbd "1") 'scheme-mode)

Then I want to look up in the global keymap space whether the desired
key already exists, and if it does, then I want to warn the user what
function was rebound to that keymap. Eg:

(defadvice global-set-key (before check-keymapping activate)
  (let ((key (ad-get-arg 0))
        (command (ad-get-arg 1)))
    (when command
      (warn (concat "Just stomped on a global keymapping bound to: "

The only problem is that this doesn't work, as global-undo-tree starts
complaining and I'm not sure where to start looking . Setting
debug-on-error to true doesn't even reveal anything useful.

Where might I start debugging further?

Kind regards,

Grant Rettke | AAAS, ACM, ASA, FSF, IEEE, SIAM, Sigma Xi
address@hidden |
“Wisdom begins in wonder.” --Socrates
((λ (x) (x x)) (λ (x) (x x)))
“Life has become immeasurably better since I have been forced to stop
taking it seriously.” --Thompson

reply via email to

[Prev in Thread] Current Thread [Next in Thread]