Re: [xmonad] Key bindings with letteral buttons

29 Jun 2008

      26/06/2008 в 09:18 -0300, Marco Túlio Gontijo e Silva:
...
Em Qui, 2008-06-26 às 15:29 +0400, Mishustin Alexey escreveu:
...
I'm using Xmonad with GNOME on Debian Etch. And I have the following
trouble: Xmonad doesn't work at all key bindings with letteral
(A-Z,a-z) buttons.
I don't know what could be causing this, but I've used XMonad with
Debian Etch and GNOME for a time.  Can you send us your xmonad.hs?  You
could try testing with mine
( http://marcotmarcot.googlepages.com/xmonad.hs ) just to see if it
works.
What version of XMonad are you using?  My xmonad.hs is for the darcs
version.
Thanks.
Hello,

Thank you for the reply,

My version of XMonad is 0.7-1~bpo40+1 (from
http://people.debian.org/~jps/etch ). My GNOME version is 2.14.

Trying to use your xmonad.hs I'm getting this error:

==================================================
Error detected while loading xmonad configuration
file: /home/shumkar/.xmonad/xmonad.hs

xmonad.hs:66:7:
	Could not find module `XMonad.Config.Gnome':
		It is not a module in the current program, or in any known package.

Please check the file for errors.
==================================================

About my xmonad.hs. I tried different ones. 

First, I used the recommended minimal xmonad.hs, according to the manual
http://haskell.org/haskellwiki/Xmonad/Using_xmonad_in_Gnome :

==================================================
import XMonad
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops

main = xmonad defaultConfig
{ manageHook = manageDocks <+> manageHook defaultConfig
, logHook = ewmhDesktopsLogHook
, layoutHook = avoidStruts $ layoutHook defaultConfig
, modMask = mod4Mask
}
==================================================

Now I'm using another config.hs. I made it according to numerous
examples. And I have the same behaviour of XMonad using all config.hs,
and the same problem with letteral key bindings. Here is my current
config.hs:

import XMonad
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.EwmhDesktops
import XMonad.Util.EZConfig
import XMonad.Util.CustomKeys
import XMonad hiding ( (|||) )
import System.Exit
import XMonad.Layout.Combo
import XMonad.Layout.LayoutCombinators
import XMonad.Layout.Square
import XMonad.Layout.Tabbed
import XMonad.Layout.WindowNavigation
import XMonad.Layout.Accordion
import XMonad.Layout.Magnifier
import XMonad.Layout.NoBorders
import XMonad.Layout.SimpleFloat
import XMonad.Layout.WindowArranger
import XMonad.Layout.ResizableTile
import XMonad.Layout.LayoutScreens
import XMonad.Layout.Simplest
import XMonad.Layout.Grid
import XMonad.Layout.Combo                         
import XMonad.Layout.TwoPane
import XMonad.Layout.WindowNavigation
import XMonad.Layout.Square
import XMonad.Layout.Named
import XMonad.Prompt
import XMonad.Prompt.Shell
import XMonad.Prompt.Ssh
import XMonad.Prompt.Theme
import XMonad.Prompt.Window
import XMonad.Prompt.XMonad
import XMonad.Util.Run
import XMonad.Util.Themes
import XMonad.Util.EZConfig
import XMonad.Util.Run (spawnPipe)
import XMonad.Util.WorkspaceCompare   
import XMonad.Actions.CycleWS
import XMonad.Actions.DwmPromote
import XMonad.Actions.Warp
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.ServerMode
import XMonad.Hooks.EwmhDesktops
import XMonad.Hooks.ManageDocks
import XMonad.Hooks.UrgencyHook  

import qualified XMonad.StackSet as W
import qualified Data.Map        as M

main = xmonad $ defaultConfig
                { manageHook = manageDocks <+> manageHook defaultConfig
                , logHook    = ewmhDesktopsLogHook
                , layoutHook = ewmhDesktopsLayout $ avoidStruts
                                 $ layoutHook defaultConfig
                , modMask    = myModMask
                , keys       = \c -> myKeys `M.union` keys defaultConfig
c
                }

myModMask = mod4Mask

myKeys = M.fromList $
         [ ((myModMask, xK_Tab ), kill)
         ]

Regards, 
Alex