mirror of
https://github.com/jtdaugherty/brick.git
synced 2024-12-12 12:23:21 +03:00
Docstring typo
This commit is contained in:
parent
19f5650a1b
commit
adf0146142
@ -80,10 +80,10 @@ class HandleEvent a where
|
||||
handleEvent :: Event -> a -> a
|
||||
|
||||
-- | A template haskell function to build lenses for a record type. This
|
||||
-- function differs from the 'Lens.makeLenses' function in that it does
|
||||
-- not require the record fields to be prefixed with underscores and
|
||||
-- it adds an "L" suffix to lens names to make it clear that they are
|
||||
-- lenses.
|
||||
-- function differs from the 'Control.Lens.makeLenses' function in that
|
||||
-- it does not require the record fields to be prefixed with underscores
|
||||
-- and it adds an "L" suffix to lens names to make it clear that they
|
||||
-- are lenses.
|
||||
suffixLenses :: TH.Name -> TH.DecsQ
|
||||
suffixLenses = makeLensesWith $
|
||||
lensRules & lensField .~ (\_ _ name -> [TopName $ TH.mkName $ TH.nameBase name ++ "L"])
|
||||
|
Loading…
Reference in New Issue
Block a user