Re-order inits because of Gnus fuckery

[syinit] / 09-sounds-sy.el

diff --git a/09-sounds-sy.el b/09-sounds-sy.el
deleted file mode 100644 (file)
index 5eb3167..0000000
--- a/09-sounds-sy.el
+++ /dev/null
@@ -1,89 +0,0 @@
-;; 09-sounds-sy.el --- Sound set up   -*- Emacs-Lisp -*-
-
-;; Copyright (C) 2007 - 2013 Steve Youngs
-
-;;     Author: Steve Youngs <steve@sxemacs.org>
-;; Maintainer: Steve Youngs <steve@sxemacs.org>
-;;    Created: <2007-12-02>
-;; Time-stamp: <Friday Aug 16, 2013 13:05:54 steve>
-;;   Download: <http://bastard.steveyoungs.com/~steve/SXEmacs/inits/>
-;;   HTMLised: <http://bastard.steveyoungs.com/~steve/SXEmacs/htmlinits/09-sounds-sy.html>
-;;   Git Repo: git clone http://git.sxemacs.org/syinit
-;;   Keywords: init, compile
-
-;; This file is part of SYinit
-
-;; Redistribution and use in source and binary forms, with or without
-;; modification, are permitted provided that the following conditions
-;; are met:
-;;
-;; 1. Redistributions of source code must retain the above copyright
-;;    notice, this list of conditions and the following disclaimer.
-;;
-;; 2. Redistributions in binary form must reproduce the above copyright
-;;    notice, this list of conditions and the following disclaimer in the
-;;    documentation and/or other materials provided with the distribution.
-;;
-;; 3. Neither the name of the author nor the names of any contributors
-;;    may be used to endorse or promote products derived from this
-;;    software without specific prior written permission.
-;;
-;; THIS SOFTWARE IS PROVIDED BY THE AUTHOR "AS IS" AND ANY EXPRESS OR
-;; IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-;; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-;; DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
-;; FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-;; CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-;; SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
-;; BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
-;; WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
-;; OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
-;; IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-;;; Commentary:
-;;
-;;   Just sets up sound stuff.
-;;
-
-;;; Credits:
-;;
-;;   The HTML version of this file was created with Hrvoje Niksic's
-;;   htmlize.el which is part of the XEmacs "text-modes" package.
-;;
-
-;;; Todo:
-;;
-;;     
-
-;;; Code:
-;:*=======================
-;:* Set default sound device
-(when (getenv "DISPLAY")               ; skip the lot if not in X11
-  (setq default-audio-device (make-audio-device 'pulse))
-  ;(setq default-audio-device (make-audio-device 'alsa))
-  (init-workers 6)
-  (setq synchronous-sounds nil)
-  (load "sound")
-  (setq bell-volume 100)
-  (when (device-sound-enabled-p)
-    (load-sound-file "low-smash" 'auto-save-error)
-    (load-sound-file "bark" 'command-error)
-    (load-sound-file "slap" 'undefined-key)
-    (load-sound-file "slap" 'undefined-click)
-    (load-sound-file "clink" 'no-completion)
-    (load-sound-file "bong" 'y-or-n-p)
-    (load-sound-file "explosion" 'yes-or-no-p)
-    (load-sound-file "drip" 'buffer-bound)
-    (load-sound-file "whip" 'read-only)
-    (load-sound-file "bass-snap" 'default)
-    (load-sound-file "yeep" 'quit)
-    (load-sound-file "drum-beep" 'isearch-failed)
-    (load-sound-file "bass-snap" 'isearch-quit)
-    (load-sound-file "slap" 'ready)
-    (load-sound-file "return" 'warp)
-    (load-sound-file "cuckoo" 'alarm))
-  )
-;:*::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
-(if default-audio-device
-    (message "sounds loaded")
-  (message "sounds NOT loaded (OK if this is a TTY)"))