*FvwmEvent-Sound: Cmd "Exec exec artsplay "

DestroyFunc FuncFvwmStartFvwmEvent-Sound
AddToFunc   FuncFvwmStartFvwmEvent-Sound
+ I Module FvwmEvent FvwmEvent-Sound

DestroyFunc FuncFvwmStopFvwmEvent-Sound
AddToFunc   FuncFvwmStopFvwmEvent-Sound
+ I KillModule FvwmEvent FvwmEvent-Sound

DestroyFunc FuncFvwmAddToMenusStartSoundEffect
AddToFunc   FuncFvwmAddToMenusStartSoundEffect
+ I + "Sound Effect (artsplay)%menu/sound.xpm%" \
	FuncFvwmRestartModuleByAlias FvwmEvent FvwmEvent-Sound

DestroyFunc FuncFvwmAddToMenusStopSoundEffect
AddToFunc   FuncFvwmAddToMenusStopSoundEffect
+ I + "Stop Sound Effect%menu/quit.xpm%" killmodule FvwmEvent FvwmEvent-Sound
