Hacker News new | ask | show | jobs
by codemac 1108 days ago
I ended up with the following[0]

    (keyboard-translate ?\C-x ?\C-t)
    (keyboard-translate ?\C-t ?\C-x)
Along with a quick function to make sure I don't forget :)

    (global-set-key
     (kbd "C-t") 
     (lambda ()
       (interactive)
       (run-with-timer 
        0.3 nil 
        (lambda ()
          ;; Assuming these are the default values
          (setq visible-bell nil)
          (setq ring-bell-function 'ignore)))
       (setq visible-bell t)
       (setq ring-bell-function nil)
       (error "Don't press that button.")))
[0]: https://github.com/codemac/config/blob/master/emacs.d/boot.o...