update

Makefile

@@ -5,11 +5,11 @@ home_symlinks = aliases Xresources
 
 config_copy = 
 
-config_symlinks = 
+config_symlinks = xmonad
 
 all: install
 
-install: aliases Xresources
+install: aliases Xresources xmonad
 
 .PHONY: $(home_symlinks)
 $(home_symlinks):

Xresources

@@ -1,2 +1,9 @@
-XTerm*Background: black
-XTerm*Foreground: orange
+urxvt*scrollBar:	false
+
+urxvt*background:	black
+urxvt*foreground:	orange
+urxvt.transparent:	true
+urxvt.shading:		30
+
+urxvt*font:		xft:DejaVuSansMono:pixelsize=14
+urxvt*boldFont:		xft:DejaVuSansMono:pixelsize=14

aliases

@@ -1,6 +1,3 @@
 alias irc="ssh -6 pew@paul.walko.org"
 alias irc-admin="ssh -6 ubuntu@paul.walko.org"
-alias hackbox="ssh -p2222 -6 paul@hackbox.walko.org"
-alias arch-hackbox="ssh -p2222 -6 paul@arch-hackbox.walko.org"
-alias arch-nat="ssh -p2222 paul@arch-hackbox-nat.walko.org"
-alias arm="ssh -6 debian@arm.walko.org"
+alias hackbox="ssh -p2222 -6 paul@cabinet.walko.org"

xinitrc

@@ -0,0 +1,6 @@
+#!/bin/sh
+
+[ -f ~/.Xresources ] && xrdb -merge .Xresources
+xsetroot -cursor_name left_ptr
+
+exec xmonad

xmonad/xmonad.hs

@@ -0,0 +1,63 @@
+-- Old Imports saved so I don't loose them
+-- import qualified XMonad.StackSet as W
+-- Also random comments for future reference:
+-- https://gist.github.com/BinRoot/8154650
+-- TODO: statusbar
+
+import XMonad
+import XMonad.Wallpaper
+import XMonad.Config.Desktop
+import XMonad.Hooks.ManageHelpers
+import XMonad.Layout.Spacing (smartSpacing)
+import XMonad.Util.EZConfig ( additionalKeys )
+import XMonad.Layout.NoBorders ( smartBorders )
+
+import System.Exit
+
+-- Fullscreen video hax Imports
+-- https://www.reddit.com/r/xmonad/comments/4cnjhi/fullscreen_video_in_firefox/d1juwkl/
+import XMonad.Hooks.DynamicLog
+import XMonad.Hooks.ManageDocks
+import XMonad.Hooks.ManageHelpers
+import XMonad.Hooks.EwmhDesktops
+import XMonad.Layout.NoBorders
+
+-- set mod key (alt)
+myModMask     = mod1Mask
+
+-- set terminal
+myTerminal    = "urxvt"
+
+-- border spacing
+myLayoutHook  = smartSpacing 4 $ smartBorders ( avoidStruts $  layoutHook defaultConfig )
+
+-- border sie
+myBorderWidth = 0
+
+main = do
+    setRandomWallpaper ["$HOME/images/wallpaper"]
+    xmonad $ defaultConfig
+        { terminal        = myTerminal
+        , layoutHook      = myLayoutHook
+        , borderWidth     = myBorderWidth
+        -- Video hax
+        , manageHook      = manageDocks <+> manageHook defaultConfig
+        , handleEventHook = handleEventHook defaultConfig <+> fullscreenEventHook
+        --
+        } `additionalKeys` myAdditionalKeys
+
+myAdditionalKeys =
+    [ ((myModMask,               xK_q), spawn "i3lock -i $HOME/images/lock.png")
+    ] ++
+    [ ((myModMask .|. shiftMask, xK_q), kill)
+    ] ++ 
+    [ ((myModMask,               xK_c), spawn "xmonad --recompile; xmonad --restart")
+    ] ++
+    [ ((myModMask .|. shiftMask, xK_c), io (exitWith ExitSuccess))
+    ]
+
+-- More Video hax
+myManageHooks = composeAll
+      [ isFullscreen --> doFullFloat
+      ]
+--