diff --git a/emacs-keys.cabal b/emacs-keys.cabal
--- a/emacs-keys.cabal
+++ b/emacs-keys.cabal
@@ -1,5 +1,5 @@
 name:                emacs-keys
-version:             0.0.1.0
+version:             0.0.2.0
 synopsis:            library to parse emacs style keybinding into the modifiers and the chars
 description:         Allows parsing emacs style keybindings like "M-a", "C-M-a" or
                      "M-Return". For convenience a TH helper that turns parse
diff --git a/src/EmacsKeys/TH.hs b/src/EmacsKeys/TH.hs
--- a/src/EmacsKeys/TH.hs
+++ b/src/EmacsKeys/TH.hs
@@ -17,6 +17,6 @@
       [|($(lift mods)
         ,$(ListE <$>
            traverse (\(Keysym x) ->
-                       AppE (VarE (mkName "Keysym")) <$>
+                       AppE (ConE (mkName "Keysym")) <$>
                        lift x)
                     keysyms))|]