gistfile1.perl

# show some info at the bottom
caption always "%{= kw}%-w%{= gW}%n %t%{-}%+w %-= %{= r}%H%{-} %{= g}%l%{-} %c:%s"
# Don't trap C-s and C-q
defflow off

# clear the screen properly when vim (et al) exits
altscreen on

# no visual bell, thanks
vbell off
# Without this screen is unusable
nethack on

# Turn off the startup banner
startup_message off

# keep a long scroll buffer
defscrollback 10000
# leave window open after command is finished,
# destroy with 'd', resurrect with 'r'
zombie ar

sessionname vim
screen -t app
stuff "cd ~/lib^M"

screen -t templates
stuff "cd ~/root/site"

screen -t config
stuff "cd ~/"

screen -t mysql
stuff "mysql -uroot -p suitesetup"

screen -t server
stuff "DBIC_TRACE=1 CATALYST_DEBUG=1 perl -Ilib script/suitesetup_web.pl"

screen -t tests
stuff "cd ~/t"

select 0