Removed some useless TH dollar-signs from test code and docs.

sebastiaanvisser · Jul 25, 2012 · f0bd829 · f0bd829
1 parent 23feb0c
commit f0bd829
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/bench/Benchmark.hs b/bench/Benchmark.hs
@@ -19,7 +19,7 @@ data Place = Place
   , _continent :: String
   } deriving (Show, Eq)
 
-$(mkLabels [''Person, ''Place])
+mkLabels [''Person, ''Place]
 
 jan :: Person
 jan = Person "Jan" 71 True (Place "Utrecht" "The Netherlands" "Europe") Nothing

diff --git a/src/Data/Label.hs b/src/Data/Label.hs
@@ -46,7 +46,7 @@ underscore. This underscore is an indication for our Template Haskell code to
 derive lenses for these fields. Deriving lenses can be done with this simple
 one-liner:
 
->$(mkLabels [''Person, ''Place])
+>mkLabels [''Person, ''Place]
 
 For all labels a lens will created.
 

diff --git a/test/Deriving.hs b/test/Deriving.hs
@@ -31,7 +31,7 @@ data Member a =
    }
  deriving Show
 
-$(mkLabels [''Family, ''Member])
+mkLabels [''Family, ''Member]
 
 myself :: Member Int
 myself = Person "Me" 28 (Family (Just myDad) (Just myMum))