--- /dev/null
+#!/bin/sh
+
+if [ -d /etc/X11/xinit/xinitrc.d ]; then
+ for f in /etc/X11/xinit/xinitrc.d/*; do
+ [ -x "$f" ] && . "$f"
+ done
+ unset f
+fi
+
+urxvtd -q -o -f
+
+sh ~/.fehbg &
+
+xset +fp /usr/local/lib/X11/fonts/terminus
+xset fp rehash
+#xbindkeys &
+xcalib .colorprofiles/macbookpro83.icc &
+xsetroot -cursor_name left_ptr &
+xrdb ~/.Xresources &
+
+export WM="xmonad" &
+export TERM="rxvt-unicode" &
+
+# this goes in .bash_profile
+#export EDITOR="vim" &
+#export PATH=$(cope_path):$PATH &
+#export PATH=~/golang/bin:$PATH &
+#export PATH=$PATH:$HOME/bin &
+#export GOPATH=~/golang &
+#export CVSROOT=anoncvs@mirror.planetunix.net:/cvs &
+#export PKG_PATH=ftp://mirror.planetunix.net/pub/OpenBSD/snapshots/packages/amd64/ &
+
+exec /home/kremlin/.cabal/bin/xmonad
+
--- /dev/null
+Config { font = "-*-terminus-*-*-normal--12-120-72-72-c-60-*-*"
+ , bgColor = "#170f0d"
+ , fgColor = "#746c48"
+ , borderColor = "#746c48"
+ , border = NoBorder --BottomBM 1
+ , position = Top
+ , allDesktops = True
+ , pickBroadest = False
+ , hideOnStart = False
+ , overrideRedirect = True
+ , persistent = True
+ , lowerOnStart = True
+ , sepChar = "%"
+ , alignSep = "}{"
+ , template = "%UnsafeStdinReader% }{ %battery% <fc=#af652f>|</fc> <fc=#e4dc8c>%date%</fc> <fc=#af652f>|</fc> %KHOU% <fc=#af652f>|</fc> %uname%"
+ , commands = [ Run Weather "KHOU" ["-t","Houston: <tempF> F (<skyCondition>)","-L","32","-H","80","--normal","#70a16c","--high","#af652f","--low","#7b854e"] 36000
+ , Run Com "uname" ["-s","-r"] "" 36000
+ , Run Date "%a %b %d %Y %I:%M %p (%S)" "date" 10
+ , Run Battery ["-t", "Bat: <left>","-L","15","-H","90","--high","#7b854e","--low","#af652f"] 600
+ , Run UnsafeStdinReader
+ ]
+}
--- /dev/null
+import XMonad
+import XMonad.Actions.SpawnOn
+import XMonad.Hooks.DynamicLog
+import XMonad.Hooks.ManageDocks
+import XMonad.Util.Run
+import XMonad.Util.EZConfig(additionalKeys)
+import XMonad.Util.WorkspaceCompare
+import XMonad.Layout.PerWorkspace
+import XMonad.Layout.Spacing
+import XMonad.Layout.ThreeColumns
+import XMonad.Layout.Spiral
+import Data.Ratio
+import System.IO
+
+threeColLayout = ThreeCol 2 (3/100) (1/2)
+tallLayout = Tall 1 (5/100) (2/3)
+spiralLayout = spiral (1 % 1)
+
+mLayout = spacing 7
+ $ tallLayout
+ ||| threeColLayout
+ ||| spiralLayout
+
+mStartupHook :: X ()
+mStartupHook = do
+ spawnOn "term" "kremterm"
+ spawnOn "term" "kremterm"
+ spawnOn "term" "kremterm"
+ spawnOn "term" "kremterm"
+ spawnOn "term" "kremterm"
+ spawnOn "term" "kremterm"
+ spawnOn "term" "kremterm"
+
+ spawnOn "www" "google-chrome-stable"
+
+ spawnOn "chat" "skype"
+ spawnOn "chat" "kremirc"
+
+ spawnOn "music" "spotify"
+ spawnOn "music" "kremcmus"
+
+ spawnOn "game" "steam"
+
+mManageHook = composeAll
+ [ appName =? "kremterm" --> doShift "term"
+ , appName =? "google-chrome-stable" --> doShift "www"
+ , appName =? "firefox" --> doShift "www"
+ , appName =? "kremirc" --> doShift "chat"
+ , appName =? "skype" --> doShift "chat"
+ , appName =? "spotify" --> doShift "music"
+ , appName =? "kremcmus" --> doShift "music"
+ , appName =? "thunderbird" --> doShift "mail"
+ , appName =? "Steam" --> doShift "game"
+ , className =? "Steam" --> doShift "game"
+ , appName =? "steam" --> doShift "game"
+ , className =? "steam" --> doShift "game"
+ , appName =? "steam.sh" --> doShift "game"
+ , className =? "steam.sh" --> doShift "game"
+ , appName =? "gimp" --> doShift "extra"
+ ]
+
+mWorkspaces = ["mon", "term", "www", "chat", "music", "mail", "game", "code", "extra"]
+-- 1 2 3 4 5 6 7 8 9
+
+main = do
+ xmproc <- spawnPipe "xmobar"
+ xmonad $ defaultConfig
+ { manageHook = mManageHook <+> manageDocks
+ , layoutHook = avoidStruts $ mLayout
+ , startupHook = mStartupHook
+ , logHook = dynamicLogWithPP xmobarPP
+ { ppOutput = hPutStrLn xmproc
+ , ppCurrent = xmobarColor "#70a16c" "" . wrap "[" "]"
+ , ppTitle = xmobarColor "#70a16c" "" . shorten 40
+ , ppVisible = wrap "(" ")"
+ , ppWsSep = " <fc=#af652f>|</fc> "
+ , ppUrgent = xmobarColor "#af652f" ""
+ , ppHidden = xmobarColor "#746c48" ""
+ , ppHiddenNoWindows = xmobarColor "#746c48" ""
+ , ppOrder = \(ws:_:t:_) -> [ws,t]
+ }
+ , workspaces = mWorkspaces
+ , modMask = mod4Mask
+ , normalBorderColor = "#170f0d"
+ , focusedBorderColor = "#746c48"
+ , borderWidth = 2
+ , terminal = "urxvtc"
+ }