#!/bin/zsh

gtkpbbuttons&

xhost +
$HOME/progs/perl/xmodmap_kludge ~/.dvorak | xmodmap -
xrdb $HOME/.Xdefaults

xtoolwait='/usr/bin/xtoolwait -timeout 1'
#
# Startup the window manager first
#
ratpoison > /tmp/ratpoison 2>&1 &
wmpid=$!

xtoolwait xterm -j -fn 7x14 -ls  -bg black -bd black -cr yellow -fg yellow +sb -sl 0 +ah -name Run 
xtoolwait xterm -name Root -ls -fn 7x14 -g 80x24+0-0 -j -bg black -fg red -sb -sl 5000 +ah  -e su - 

sleep 1

#######################################################################
# dockapps

# create & Switch to a new group to capture all the dockapps.
ratpoison -c "gnew dock"

dockapps

lavaps&

# the dockapp xterm.
xtoolwait xterm -ls -fn 7x14 -g 80x24+0-0 -j -bg black -fg yellow -sb -sl 5000 +ah -name dockterm -title dockterm

sleep 1

# restore the dock frameset.
ratpoison -c "frestore `cat ${HOME}/junk/config/quasar.linux/ratpoison_frames/dockapps.frames`"

# clear all frames.
ratpoison -c "fselect 0"
ratpoison -c "select -"
ratpoison -c "fselect 1"
ratpoison -c "select -"
ratpoison -c "fselect 2"
ratpoison -c "select -"
ratpoison -c "fselect 3"
ratpoison -c "select -"
ratpoison -c "fselect 4"
ratpoison -c "select -"
ratpoison -c "fselect 5"
ratpoison -c "select -"
ratpoison -c "fselect 6"
ratpoison -c "select -"
ratpoison -c "fselect 7"
ratpoison -c "select -"
ratpoison -c "fselect 8"
ratpoison -c "select -"

# put all the dockapps in the right place.
ratpoison -c "fselect 1"
ratpoison -c "select xload"
ratpoison -c 'number 0'

ratpoison -c "fselect 2"
ratpoison -c "select allin1"
ratpoison -c 'number 1'

ratpoison -c "fselect 4"
ratpoison -c "select 2"

ratpoison -c "fselect 3"
ratpoison -c "select wmwave"
ratpoison -c 'number 3'

ratpoison -c "fselect 6"
ratpoison -c "select 4"

ratpoison -c "fselect 5"
ratpoison -c "select asclock"
ratpoison -c 'number 5'

ratpoison -c "fselect 8"
ratpoison -c "select LavaPS"
ratpoison -c 'number 6'

ratpoison -c "fselect 7"
ratpoison -c "select dockterm"
ratpoison -c "number 7"

#######################################################################
sleep 1

# move back to the default group.
ratpoison -c "gprev"

# put the normal xterm in front.
ratpoison -c "fselect 0"
ratpoison -c "select 0"

xset m 0 0 s 0 dpms 300 1200 1500

wait $wmpid