;ELC   
;;; Compiled by amu@quiche-lorraine.mit.edu on Thu Jan  6 19:17:11 2000
;;; from file /afs/sipb.mit.edu/contrib/emacs/packages/gnus-5.8.3/lisp/gnus-audio.el
;;; in Emacs version 20.4.1
;;; with bytecomp version 2.56
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`gnus-audio.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\303\301!\204 \303\301!\204 \304\305\"\301\nB\306\307!\207" [emacs-version running-xemacs current-load-list boundp string-match "XEmacs\\|Lucid" require nnheader] 3)
#@56 When t, we will not spawn a subprocess to play sounds.
(defvar gnus-audio-inline-sound (byte-code "\300\301!\205 \301 \207" [fboundp device-sound-enabled-p] 2) (#$ . 830))
#@43 The directory containing the Sound Files.
(defvar gnus-audio-directory (nnheader-find-etc-directory "sounds") (#$ . 1009))
#@59 Executable program for playing sun AU format sound files.
(defvar gnus-audio-au-player "/usr/bin/showaudio" (#$ . 1138))
#@43 Executable program for playing WAV files.
(defvar gnus-audio-wav-player "/usr/local/bin/play" (#$ . 1265))
#@35 Play a sound through the speaker.
(defalias 'gnus-audio-play #[(file) "\306!\203\n \202 	P\306\n!\205= \203 \307\n!\202= \310\311\n\"\203/ \312\f\n\313\314\n%\202= \310\315\n\"\205= \312\n\313\314\n%)\207" [file gnus-audio-directory sound-file gnus-audio-inline-sound gnus-audio-wav-player gnus-audio-au-player file-exists-p play-sound-file string-match "\\.wav$" call-process 0 nil "\\.au$"] 6 (#$ . 1378) nil])
#@39 Name of the Gnus startup jingle file.
(defvar gnus-startup-jingle "Tuxedomoon.Jingle4.au" (#$ . 1805))
#@56 Play the Gnus startup jingle, unless that's inhibited.
(defalias 'gnus-play-jingle #[nil "\301!\207" [gnus-startup-jingle gnus-audio-play] 2 (#$ . 1914) nil])
(byte-code "\300\301!\210\302\303!\207" [provide gnus-audio run-hooks gnus-audio-load-hook] 2)