From b83729bf02a2d0641afefa24f4a132c7d126702f Mon Sep 17 00:00:00 2001
From: brian <brian@lorf.org>
Date: Thu, 26 Jun 2008 06:05:16 +0200
Subject: allow function keys up to F24

darcs-hash:20080626040516-8cb90-0aae953ab35ad51157be2b8e6e971f2f01dca3d8.gz
---
 XMonad/Util/EZConfig.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'XMonad/Util/EZConfig.hs')

diff --git a/XMonad/Util/EZConfig.hs b/XMonad/Util/EZConfig.hs
index 94364bf..08f38da 100644
--- a/XMonad/Util/EZConfig.hs
+++ b/XMonad/Util/EZConfig.hs
@@ -180,7 +180,7 @@ removeMouseBindings conf mouseBindingList =
 -- > <Insert>
 -- > <Break>
 -- > <Space>
--- > <F1>-<F12>
+-- > <F1>-<F24>
 -- > <KP_Space>
 -- > <KP_Tab>
 -- > <KP_Enter>
@@ -302,7 +302,7 @@ keyNames = functionKeys ++ specialKeys
 --   the associated KeySyms.
 functionKeys :: [(String, KeySym)]
 functionKeys = [ ("F" ++ show n, k)
-               | (n,k) <- zip ([1..12] :: [Int]) [xK_F1..] ]
+               | (n,k) <- zip ([1..24] :: [Int]) [xK_F1..] ]
 
 -- | A list of special key names and their corresponding KeySyms.
 specialKeys :: [(String, KeySym)]
-- 
cgit v1.2.3