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

wm withdraw .

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



catch {exec echo $letter $ifname $ttydev $pppspeed $localip $remoteip > /usr/tmp/startppp_pipe}

# catch {send startterm "showppp $letter $ifname $ttydev $pppspeed $localip $remoteip"}
catch {exec term -qqq >/dev/modem </dev/modem &}
after 4000

destroy .
