[xmonad] darcs patch: Make prompt keybindings work when numLock or capsLock are active

[Devin Mullins]

On Sun, Jun 08, 2008 at 11:26:14AM -0600, Justin Bogner wrote:
> I don't see a reason not to ignore numLock and capsLock and the like 
> when a prompt is open.

Applied, with two suggestions:
1. Use Data.Bits.testBit.
2. Don't ignore shift or mod1-5?

(Actually, I suppose those two are mutually exclusive.. I'd imagine the
code to the last one looking like:
  mask .&. (foldl' (.|.) [controlMask, mod1Mask, ...]) == controlMask
unless there's a cleverer way.)