diff --git a/Data/Aeson/TH/Smart.hs b/Data/Aeson/TH/Smart.hs
--- a/Data/Aeson/TH/Smart.hs
+++ b/Data/Aeson/TH/Smart.hs
@@ -435,7 +435,7 @@
   other <- newName "other"
   flip (match (varP other)) []
     (normalB $ [| fail $ printf "No constructors for type %s were present." |]
-      `appE` (litE $ stringL $ nameBase tName))
+      `appE` (sigE (litE $ stringL $ nameBase tName) (conT ''String)))
 
 parseTypeMismatch :: Name -> Name -> ExpQ -> ExpQ -> ExpQ
 parseTypeMismatch tName conName expected actual =
diff --git a/Database/Cypher.hs b/Database/Cypher.hs
--- a/Database/Cypher.hs
+++ b/Database/Cypher.hs
@@ -230,7 +230,7 @@
 	if 200 <= sci && sci < 300
 		then return ()
 		else (let e = CypherServerException (responseStatus r) (responseHeaders r) (responseBody r)
-			 in traceShow e (throw e))
+			 in throw e)
 
 -- | Get the nodes matching the given lucene query
 cypherGet :: (ToJSON a1, FromJSON a) => a1 -> Cypher a
diff --git a/cypher.cabal b/cypher.cabal
--- a/cypher.cabal
+++ b/cypher.cabal
@@ -7,7 +7,7 @@
 -- The package version. See the Haskell package versioning policy
 -- (http://www.haskell.org/haskellwiki/Package_versioning_policy) for
 -- standards guiding when and how versions should be incremented.
-Version:             0.5
+Version:             0.6
 
 -- A short (one-line) description of the package.
 Synopsis:            Haskell bindings for the neo4j "cypher" query language