diff --git a/src/XMonad/Util/Keyboard.hs b/src/XMonad/Util/Keyboard.hs
--- a/src/XMonad/Util/Keyboard.hs
+++ b/src/XMonad/Util/Keyboard.hs
@@ -49,10 +49,10 @@
     out <- lines <$> readCreateProcess (shell "setxkbmap -query") ""
     let strip = dropWhile (==' ') . drop 1 . dropWhile (/=':') .* (!!)
     let line = strip out
-    if length out /= 3 then
-        pure (Simple (line 1))
+    if length out == 3 then
+        pure (Simple (line 2))
     else
-        pure (Regional (line 1) (line 2))
+        pure (Regional (line 2) (line 3))
 
 -- | Tibetan keyboard layout
 tibetan :: KbLayout
diff --git a/xmonad-vanessa.cabal b/xmonad-vanessa.cabal
--- a/xmonad-vanessa.cabal
+++ b/xmonad-vanessa.cabal
@@ -1,6 +1,6 @@
 cabal-version: >=1.10
 name: xmonad-vanessa
-version: 0.2.0.2
+version: 0.2.0.3
 license: BSD3
 license-file: LICENSE
 copyright: 2017-2018 Vanessa McHale