Re: Sound effects..

Juergen Schoenwaelder (schoenw@ibr.cs.tu-bs.de)
Fri, 23 Feb 1996 17:18:20 +0100

Hi!

mark.newnham@grandmet.co.uk said:

mark.newnham> Has anybody had any experience of using sound as a method of
mark.newnham> indicating errors (instead of or as well as flashing icons)

Sound support really needs some internal support by tkined. However,
you can quickly hack something for local and private use. All you have
to do is to change a few lines in /usr/local/lib/tkined/apps/library.tcl:

1) proc MoJoModify: add another radio button switch to the ined request
dialog so that you can set a new Threshold action:

set res [ined request "Modify $jobid ([lindex $jobcmd 0] $hosts)" \
[list [list "Intervaltime \[s\]:" $jobitv entry 10] \
[list "Job Status:" $jobstat radio active suspend] \
[list "Falling Threshold:" $falling entry 10] \
[list "Rising Threshold:" $rising entry 10] \
[list "Threshold action:" \
$action check syslog flash write sound] ] \
[list modify "kill job" cancel] ]

2) proc MoJoAction: add another if command to play the sound.

if {[lsearch $action sound] >= 0} {
exec cat ~/.tkined/flush.au > /dev/audio
}

This only works if you are running tkined on your local machine. And
this is exactly the reason why we need more support from tkined for
stuff like this. Use at your own risk. :-)

Juergen