diff --git a/rawstring-qm.cabal b/rawstring-qm.cabal
--- a/rawstring-qm.cabal
+++ b/rawstring-qm.cabal
@@ -1,5 +1,5 @@
 name:                rawstring-qm
-version:             0.2.0
+version:             0.2.1
 cabal-version:       >=1.10
 synopsis:            Simple raw string quotation and dictionary interpolation
 description:         Supply a couple of usefull QuasiQuotes so we can use functions to lookup values
diff --git a/src/Data/String/QM.hs b/src/Data/String/QM.hs
--- a/src/Data/String/QM.hs
+++ b/src/Data/String/QM.hs
@@ -83,19 +83,19 @@
 makeExpr [] = ls ""
 makeExpr (Literal a:xs)   = TH.appE [| (<>) a |]
                             $ makeExpr xs
-makeExpr (AntiQuote a:xs) = TH.appE [| (<>) (reify a) |]
+makeExpr (AntiQuote a:xs) = TH.appE [| (<>) (reify $ mkName  a) |]
                             $ makeExpr xs
 
 makeExprT [] = ls ""
 makeExprT (Literal a:xs)   = TH.appE [| (<>) a |]
                             $ makeExprT xs
-makeExprT (AntiQuote a:xs) = TH.appE [| (<>) (toText (reify a)) |]
+makeExprT (AntiQuote a:xs) = TH.appE [| (<>) (toText (reify $ mkName a)) |]
                             $ makeExprT xs
 
 makeExprTL [] = ls ""
 makeExprTL (Literal a:xs)   = TH.appE [| (<>) a |]
                             $ makeExprT xs
-makeExprTL (AntiQuote a:xs) = TH.appE [| (<>) (toLazyText (reify a)) |]
+makeExprTL (AntiQuote a:xs) = TH.appE [| (<>) (toLazyText (reify $ mkName a)) |]
                             $ makeExprT xs