--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/i3/config	Thu Oct 13 08:28:49 2011 -0400
@@ -0,0 +1,155 @@
+# This file has been auto-generated by i3-config-wizard(1).
+# It will not be overwritten, so edit it as you like.
+#
+# Should you change your keyboard layout somewhen, delete
+# this file and re-run i3-config-wizard(1).
+#
+
+# i3 config file (v4)
+#
+# Please see http://i3wm.org/docs/userguide.html for a complete reference!
+
+set $mod Mod4
+
+# font for window titles. ISO 10646 = Unicode
+font -misc-fixed-medium-r-normal--13-120-75-75-C-70-iso10646-1
+
+# Use Mouse+$mod to drag floating windows to their wanted position
+floating_modifier $mod
+
+# kill focused window
+bindsym $mod+Shift+Q kill
+
+
+# change focus
+bindsym $mod+t focus left
+bindsym $mod+s focus down
+bindsym $mod+r focus up
+bindsym $mod+n focus right
+
+# alternatively, you can use the cursor keys:
+bindsym $mod+Left focus left
+bindsym $mod+Down focus down
+bindsym $mod+Up focus up
+bindsym $mod+Right focus right
+
+# move focused window
+bindsym $mod+Shift+T move left
+bindsym $mod+Shift+S move down
+bindsym $mod+Shift+R move up
+bindsym $mod+Shift+N move right
+bindsym $mod+Shift+Left move left
+bindsym $mod+Shift+Down move down
+bindsym $mod+Shift+Up move up
+bindsym $mod+Shift+Right move right
+
+# split in horizontal orientation
+bindsym $mod+h split h
+
+# split in vertical orientation
+bindsym $mod+v split v
+
+# enter fullscreen mode for the focused container
+bindsym $mod+e fullscreen
+
+# change container layout (stacked, tabbed, default)
+bindsym $mod+u layout stacking
+bindsym $mod+eacute layout tabbed
+bindsym $mod+p layout default
+
+# toggle tiling / floating
+bindsym $mod+Shift+nobreakspace floating toggle
+
+# change focus between tiling / floating windows
+bindsym $mod+space focus mode_toggle
+
+# focus the parent container
+bindsym $mod+a focus parent
+
+# focus the child container
+#bindcode $mod+d focus child
+
+# switch to workspace
+bindsym $mod+quotedbl workspace 1
+bindsym $mod+guillemotleft workspace 2
+bindsym $mod+guillemotright workspace 3
+bindsym $mod+parenleft workspace 4
+bindsym $mod+parenright workspace 5
+bindsym $mod+at workspace 6
+bindsym $mod+plus workspace 7
+bindsym $mod+minus workspace 8
+bindsym $mod+slash workspace 9
+bindsym $mod+asterisk workspace 10
+
+# move focused container to workspace
+bindsym $mod+Shift+1 move workspace 1
+bindsym $mod+Shift+2 move workspace 2
+bindsym $mod+Shift+3 move workspace 3
+bindsym $mod+Shift+4 move workspace 4
+bindsym $mod+Shift+5 move workspace 5
+bindsym $mod+Shift+6 move workspace 6
+bindsym $mod+Shift+7 move workspace 7
+bindsym $mod+Shift+8 move workspace 8
+bindsym $mod+Shift+9 move workspace 9
+bindsym $mod+Shift+0 move workspace 10
+
+# reload the configuration file
+bindsym $mod+Shift+X reload
+# restart i3 inplace (preserves your layout/session, can be used to upgrade i3)
+bindsym $mod+Shift+O restart
+# exit i3 (logs you out of your X session)
+bindsym $mod+Shift+P exit
+
+# resize window (you can also use the mouse for that)
+mode "resize" {
+        # These bindings trigger as soon as you enter the resize mode
+
+        # They resize the border in the direction you pressed, e.g.
+        # when pressing left, the window is resized so that it has
+        # more space on its left
+
+bindsym t resize shrink left 10 px or 10 ppt
+bindsym Shift+T resize grow   left 10 px or 10 ppt
+
+bindsym s resize shrink down 10 px or 10 ppt
+bindsym Shift+S resize grow   down 10 px or 10 ppt
+
+bindsym r resize shrink up 10 px or 10 ppt
+bindsym Shift+R resize grow   up 10 px or 10 ppt
+
+bindsym n resize shrink right 10 px or 10 ppt
+bindsym Shift+N resize grow   right 10 px or 10 ppt
+
+        # same bindings, but for the arrow keys
+bindsym Left resize shrink left 10 px or 10 ppt
+bindsym Shift+Left resize grow   left 10 px or 10 ppt
+
+bindsym Down resize shrink down 10 px or 10 ppt
+bindsym Shift+Down resize grow   down 10 px or 10 ppt
+
+bindsym Up resize shrink up 10 px or 10 ppt
+bindsym Shift+Up resize grow   up 10 px or 10 ppt
+
+bindsym Right resize shrink right 10 px or 10 ppt
+bindsym Shift+Right resize grow   right 10 px or 10 ppt
+
+        # back to normal: Enter or Escape
+bindsym Return mode "default"
+bindsym Escape mode "default"
+}
+
+bindsym $mod+o mode "resize"
+
+# start programs
+bindsym $mod+Ctrl+Return exec /usr/bin/dmenu_run
+# bindsym $mod+Return exec /usr/bin/synapse
+bindsym $mod+Shift+Return exec /usr/bin/x-terminal-emulator
+
+# Start i3bar to display a workspace bar (plus the system information i3status
+# finds out, if available)
+exec gnome-settings-daemon
+# exec xsetbg -fullscreen -onroot -border black themes/backgrounds/default.jpg
+exec trayer --align right --height 18
+exec i3status | i3bar -d
+exec nm-applet
+exec synapse -s

Binary file xkb/stdin.xkm has changed

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/xkb/symbols/fr_alt	Thu Oct 13 08:28:49 2011 -0400
@@ -0,0 +1,24 @@
+partial alphanumeric_keys
+xkb_symbols "bepo_prog"
+{
+    // J'aime bépo !
+    include "fr(bepo)"
+    // Actuellement, la plupart des programmes supporte KP_Decimal correctement
+    // (',' dans Gnumeric, Calc, GNUCash, '.' ailleurs, comme sous emacs.
+    include "kpdl(kposs)"
+
+    name[Group1] = "France - Bepo, ergonomic, Dvorak way, Programmer enhanced";
+
+    // échange w, ¤, et ^... Ça permet d'avoir le ê proche, et comme j'utilise rarement le €, c'est
+    // pas trop cher payé (désolé pour les amis européens).  Dites-vous qu'il est maintenant aussi
+    // loin que le $ l'est pour moi :).  Le point d'exclamation pourrait mieux placé toutefois.
+    key <AD06> { [w, W, exclam, exclamdown ] }; // w W ! ¡
+    key <AC04> { [e, E, dead_circumflex, dead_breve ] }; // e E ^ ̆
+    key <AD12> { [ EuroSign, dead_currency ] }; // € ¤
+
+    // Windows n'aime pas les non-espaces blancs sur la barre d'espacement, sauf avec le shift.
+    // C'est faisable de le forcer, mais PortableApps à fixer Win-Space comme clé d'activation.
+    // J'ai donc pris sur moi de le changer par shift-space pour le souligné, et ça me plaît
+    // beaucoup comme changement.
+    key <SPCE> { [ space, underscore, nobreakspace, U202F ] }; // ␣ _ (espace insécable) (espace insécable fin)
+};

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/xmobbarrc	Thu Oct 13 08:28:49 2011 -0400
@@ -0,0 +1,16 @@
+Config { font = "-*-Fixed-Bold-R-Normal-*-13-*-*-*-*-*-*-*", 
+         bgColor = "black",
+         fgColor = "grey",
+         position = TopW L 100,
+         lowerOnStart = True,
+         commands = [ 
+           Run Cpu ["-L","3","-H","50","--normal","green","--high","red"] 10,
+           Run Memory ["-t","Mem: <usedratio>%"] 10,
+           Run Swap [] 10,
+           Run StdinReader,
+           Run CommandReader "ledmon" "LED"
+           ],
+         sepChar = "%",
+         alignSep = "}{",
+         template = "%StdinReader% }{ <fc=#00ff00>%LED%</fc> %cpu% | %memory% | %swap%"
+       }
\ No newline at end of file

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/xmonad/xmonad.hs	Thu Oct 13 08:28:49 2011 -0400
@@ -0,0 +1,121 @@
+-- Import statements
+import XMonad
+-- import XMonad.Config.Gnome
+import XMonad.Hooks.DynamicLog
+import XMonad.Hooks.ManageDocks
+import XMonad.Hooks.EwmhDesktops
+import XMonad.Hooks.Place
+import XMonad.Hooks.FadeInactive
+import XMonad.Hooks.UrgencyHook
+import XMonad.Config.Gnome
+import XMonad.Util.Run
+import XMonad.Util.EZConfig
+import XMonad.Actions.CycleWS
+import XMonad.Actions.Promote
+import XMonad.Actions.RotSlaves
+import qualified XMonad.StackSet as S
+import System.IO
+import XMonad.Layout.NoBorders
+import XMonad.Layout.Tabbed
+import XMonad.Layout.Spiral
+import XMonad.Layout.MosaicAlt
+import XMonad.Layout.ThreeColumns
+import qualified Data.Map as M
+import System.Exit
+
+-- defines
+
+myModMask = mod4Mask -- Windows key
+myTerminal = "x-terminal-emulator"
+myWorkspaces = ["1", "2", "3", "4", "5", "6", "7", "8", "9", "0"]
+upperRowKeys = [ xK_quotedbl, 
+                 xK_guillemotleft, 
+                 xK_guillemotright,
+                 xK_parenleft,
+                 xK_parenright,
+                 xK_at,
+                 xK_plus,
+                 xK_minus,
+                 xK_slash,
+                 xK_asterisk ]
+numberOfWS = 4
+               
+myWSKeys = [ ((m .|. myModMask, k), windows $ f i)
+           | (i, k) <- take numberOfWS (zip myWorkspaces upperRowKeys),
+             (f, m) <- [(S.greedyView, 0), (S.shift, shiftMask)]]
+
+-- X Y W H
+myDefaultDialogSize = S.RationalRect (1/4) (1/4) (1/2) (1/2)
+
+myKeys = [ 
+    ((myModMask .|. shiftMask, xK_Return        ), spawn $ myTerminal),
+    ((myModMask,               xK_m             ), windows S.focusMaster ),
+    ((myModMask .|. shiftMask, xK_m             ), promote ),
+    ((myModMask .|. shiftMask, xK_Tab           ), rotAllUp ),
+    ((myModMask              , xK_space         ), sendMessage NextLayout),
+    ((myModMask,               xK_q             ), kill),
+    ((myModMask .|. shiftMask, xK_q             ), io (exitWith ExitSuccess)),
+    ((myModMask .|. shiftMask, xK_r             ), spawn "xmonad --recompile && xmonad --restart"),
+    (( 0,                      xK_Print         ), spawn "gnome-screenshot -i"),
+    ((myModMask,               xK_b             ), sendMessage ToggleStruts),
+    -- S.
+    ((myModMask,               xK_d             ), withFocused $ windows . (`S.float` myDefaultDialogSize)),
+    ((myModMask .|. shiftMask, xK_d             ), withFocused $ windows . S.sink),
+    -- ((myModMask .|. shiftMask, xK_b             ), sendMessage (SetStruts [D] [])),
+    
+    -- Vi-like bindings for modifying layout
+    ((myModMask,                 xK_t             ), windows S.focusDown ),
+    ((myModMask,                 xK_s             ), windows S.focusUp ),
+    ((myModMask .|. shiftMask  , xK_t             ), windows S.swapDown ),
+    ((myModMask .|. shiftMask  , xK_s             ), windows S.swapUp ),
+    ((myModMask .|. controlMask, xK_t             ), sendMessage Shrink ),
+    ((myModMask .|. controlMask, xK_s             ), sendMessage Expand ),
+    ((myModMask .|. shiftMask  , xK_n             ), sendMessage (IncMasterN (1))),
+    ((myModMask                , xK_n             ), sendMessage (IncMasterN (-1)))
+    ] ++ myWSKeys
+         
+         
+fib :: Int -> Int
+fib 0 = 0
+fib 1 = 1
+fib n = fib (n-1) + fib (n-2)
+
+golden :: Int -> Rational
+golden n = toRational (fib n) / toRational (fib (n-1))
+
+myLayouts = tall ||| threeCol ||| Mirror tall ||| threeCol ||| mosaic ||| simpleTabbed ||| Full
+  where 
+    mosaic = MosaicAlt M.empty
+    mySpiral = spiral ratio
+    tall = Tall nmaster delta ratio
+    threeCol = ThreeCol nmaster delta ratio
+    nmaster = 2
+    delta = 3/100
+    ratio = 2/3
+
+fadingHook = fadeInactiveLogHook fadeAmount
+  where fadeAmount = 0.7
+
+-- Run
+main = do
+  xmproc <- spawnPipe "xmobar"  
+  xmonad 
+    $ withUrgencyHook dzenUrgencyHook { args = ["-bg", "darkgreen", "-xs", "1"] }
+    $ ewmh 
+    $ gnomeConfig { 
+    terminal = myTerminal,
+    borderWidth = 0,
+    focusFollowsMouse = False,
+    workspaces = take numberOfWS myWorkspaces,
+    manageHook = manageDocks <+> 
+                 placeHook (smart (0.5, 0.5)) <+> 
+                 manageHook defaultConfig,
+    layoutHook = avoidStruts $ myLayouts,
+    logHook = fadingHook >> dynamicLogWithPP xmobarPP {
+      ppOutput = hPutStrLn xmproc,
+      ppTitle = xmobarColor "green" "" . shorten 50 
+      },
+    modMask = myModMask -- windows key
+    } `removeKeys` [
+      (myModMask, xK_Return)
+    ] `additionalKeys` myKeys
\ No newline at end of file

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/xsession	Thu Oct 13 08:28:49 2011 -0400
@@ -0,0 +1,33 @@
+## composition manager
+xcompmgr &
+
+## Set keyboard
+
+XKBDIR="$HOME/.xkb"
+setxkbmap "fr_alt(bepo_prog)" -print | xkbcomp -I$XKBDIR - $DISPLAY
+
+## Set background
+# xsetbg -fullscreen -onroot -border black themes/backgrounds/default.jpg
+# gnome-settings both set the background and the resolution
+gnome-settings-daemon
+
+## Quick launcher
+synapse -s &
+# gdlinux
+
+## Start a panel
+
+# trayer doesn't set its strut correctly, bugging xmonad.
+# trayer --SetDockType true --SetPartialStrut true
+# gnome-panel 
+# fbpanel &
+avant-window-navigator &
+# dockx &
+
+# autostart
+xdg-autostart Old GNOME
+
+## Window manager
+# Can't get ride of the gnome-panel :(
+# exec gnome-session
+exec xmonad