Skip to content

Instantly share code, notes, and snippets.

@faried
Created February 11, 2016 08:09
Show Gist options
  • Save faried/2a2dd0bf2cf80fe70e5c to your computer and use it in GitHub Desktop.
Save faried/2a2dd0bf2cf80fe70e5c to your computer and use it in GitHub Desktop.
this can get annoying.
;; i'm using it in
;; "GNU Emacs 25.1.50.1 (x86_64-apple-darwin13.4.0, NS appkit-1265.21 Version 10.9.5 (Build 13F1134)) of 2015-12-09"
;; explode.wav is at
;; https://web.archive.org/web/20051029193334/http://www.arcanewolf.com/wizard/sounds/explode.wav
;; ring-bell-function described at https://www.emacswiki.org/emacs/AlarmBell
(setq ring-bell-function
(lambda ()
(if (memq this-command '(isearch-abort abort-recursive-edit exit-minibuffer keyboard-quit))
(call-process "afplay" nil 0 nil "/Users/fn/tmp/explode.wav")
(ding))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment