persistent-template-classy 0.1.0.1 → 0.2.0

raw patch · 3 files changed

+8/−4 lines, 3 files

Files

• examples/persistent-template-classy-example.hs +4/−0
• persistent-template-classy.cabal +3/−3
• src/Database/Persist/TH/Classy.hs +1/−1

@@ -10,6 +10,10 @@ {-# LANGUAGE FunctionalDependencies #-} {-# LANGUAGE TypeSynonymInstances #-} {-# LANGUAGE FlexibleInstances #-}+{-# LANGUAGE DerivingStrategies #-}     +{-# LANGUAGE StandaloneDeriving #-}     +{-# LANGUAGE UndecidableInstances #-}   +{-# LANGUAGE DataKinds #-}                import Control.Lens (Lens', (^.), lens) import Control.Monad.IO.Class (liftIO)

@@ -1,13 +1,13 @@ cabal-version: 1.12 --- This file has been generated from package.yaml by hpack version 0.31.0.+-- This file has been generated from package.yaml by hpack version 0.33.0. -- -- see: https://github.com/sol/hpack ----- hash: d42bdbd3c8dfe95a357a1c7edcc09b82bbce5cadb2c494dbbe9ed7d54be8d645+-- hash: 9530d91ec1ba694ed49be0da24eba33680900e20636130fa90bace81d6b05979  name:           persistent-template-classy-version:        0.1.0.1+version:        0.2.0 synopsis:       Generate classy lens field accessors for persistent models description:    Generate classy lens field accessors for persistent models. category:       Database, Lens, Yesod

@@ -99,7 +99,7 @@                     Nothing -> tname                     Just t -> t <> "." <> tname                   nonMaybe = ConT (mkName (T.unpack tnameAndModule))-               in case "Maybe" `elem` fieldAttrs of+               in case FieldAttrMaybe `elem` fieldAttrs of                     False -> nonMaybe                     True -> AppT (ConT (mkName "Maybe")) nonMaybe         return $