#Personal ratpoisonrc. Depends on two scripts.


##Setting the prefix keys
###Set the contrl-t key to something easier
escape less

###Set the contrl-t key to something easier
definekey top Insert readkey root
definekey root Insert link less



##What programs do we run on startup?
###Do some key re-mapping
exec xbindkeys 



###Change the background and pointer in X
exec xsetroot -solid black -cursor_name left_ptr

###???
exec xrdb -load ~/.Xresources

###Set a background. image must currently be manually changed.
exec Esetroot -scale pics/bf-wp1l.jpg
####This is an alternative- setting electricsheep as the background.
###exec electricsheep --root 1 --nick maru --zoom 1 --mplayer 1 --history 50 &


##aliasing keys within ratpoison
###make semicolon invoke ratpoison command, and colon shell command.
bind semicolon colon
bind colon exec


###Let's add volume control, courtesy of the second of two shell scripts in /usr/local/bin
bind asterisk exec ~/bin/rat-volume 10%+ 
bind slash exec ~/bin/rat-volume 10%-

###Showroot script	
alias showroot exec ratpoison -c fdump > FOO; ratpoison -c 'select -' -c only
alias unshowroot exec ratpoison -c "frestore `cat $HOME/.rpfdump`"
bind B showroot

###Change the date from 24-hour to 12-hour
bind a exec $RATPOISON -c "echo `date +%r_%d_%a_%b_%Y`"

###Getting a root terminal. There is no binding for "c", since that 
###is a default binding, to a terminal.
bind C exec ssh -X root@127.0.0.1 aterm

###Shortcut for emacs.
bind e exec emacs

###Shortcut for nano
bind E exec aterm -e nano

###Shortcut for firefox
bind d exec mozilla-firefox

###Shortcut for dillo
bind D exec dillo

###Shortcut for gqview
bind g exec gqview

###Binding for xchat- not currently installed.
#bind x exec xchat

###Runs a shell script which creates and alt-tab menu
bind w exec /usr/local/bin/windows

###Make prtscreen work, as long as in ratpoison mode; see long commands for
###why snapshot works.
bind Print exec import -window root png:$HOME/xwd-$(date +%s)$$.png



##Aliasing long commands within ratpoison
###Leaving open the option to use conkeror, a skin over firefox. 
###Wish I could get sane tabbed browsing in it...
alias conkeror exec mozilla-firefox -chrome chrome://conkeror/content



##Graphics tweaks
###Not quite sure what these do, copied from Reactor Core. 
###Supposedly make borders take up less space.
defborder 0
defpadding 0 0 0 0
defbarpadding 0 0 0 0


addhook deletewindow exec if [ `$RATPOISON -c windows |
			   perl -e 'my $c = 0; while (<>) { $c++;} print $c'`x =
			   "1x" ]; then $RATPOISON -c only -c other; fi