[xmonad] Re: Call for xmonad.hs

[Gwern Branwen]

On Sun, Nov 2, 2008 at 10:21 AM, Mauricio <briqueabraque at yahoo.com> wrote:
>> (...)
>>
>> 1) Upload your config
>> 2) If you've uploaded your config, update it!
>> 3) If you use someone else's config (...)
>> 4) If you don't want to do any of 1-3, perhaps (...)
>
> Since I was afraid of messing the wiki, here is
> mine.
>
> Best,
> Maurício
>
> ----------------------------
>
> module  Main  (  main )  where  {  import  qualified Data.Map  ;  import
> System.Cmd  ;  import  XMonad  ; import  XMonad.Layout.Tabbed  ;  import
> XMonad.StackSet ;
>
>  comandoDoDmenu = "exe=`dmenu_path | dmenu` && eval \"exec $exe\"" ;
>
>  executarNaInicialização = "\
>  \ xmodmap -e \"keycode 113 = 0xffea 0xffe8\" ; \
>  \ xmodmap -e \"keycode 117 = 0xffe3\" ; \
>  \ xmodmap -e \"keycode 106 = 0xffe4\" ; \
>  \ xmodmap -e \"remove lock = Caps_Lock\" ; \
>  \ xmodmap -e \"add mod1 = Alt_R\" ; \
>  \ xmodmap -e \"add mod1 = Meta_R\" ; \
>  \ xmodmap -e \"remove mod5 = Alt_R\" ; \
>  \ xset -r \
>  \" ;
>
>  teclas  conf   @  (   XConfig  {  XMonad.modMask   =  modMask  }   )  =
>  Data.Map.fromList $  [ ( ( modMask  , xK_x ) ,  spawn $ XMonad.terminal
>  conf ) , (  ( modMask , xK_d ) , spawn comandoDoDmenu  ) , ( (modMask ,
>  xK_k ) , kill)  , ( ( modMask , xK_space ) , windows  focusDown ) , ( (
>  modMask , xK_t ) , withFocused $ windows . sink) ] ;
>
>  main  =  do {  system  executarNaInicialização  ; xmonad  defaultConfig
>  {modMask =  mod4Mask , XMonad.workspaces = ["1"]  , focusFollowsMouse =
>  False , layoutHook = tabbed shrinkText defaultTConf , keys = teclas } }
>
> }
>
> ----------------------------

Hmm. Perhaps I am missing something, but where is 'defaultTConf'
coming from? I don't see it anywhere in this config, nor XMC nor XM.

--
gwern