#!/bin/sh
# the next line restarts using wish \
exec wish "$0" "$@"

wm withdraw .

set letter n
set ifname term
set ttydev /dev/modem
set pppspeed 57600
set localip ---
set remoteip ---

#catch {exec tshutdown &}

set a 0
catch {set a [eval exec ps -a | grep \"term -qqq\" | grep -v grep | cut -b 1-6]}
if {$a != 0} {
  catch "exec kill $a" 
}
catch {send startterm "showppp $letter $ifname $ttydev $pppspeed $localip $remoteip"}

destroy .
