@@ -22,7 +22,7 @@ import Control.Applicative (Alternative(..))
2222import Control.Monad.Catch (MonadCatch )
2323import Control.Monad.IO.Class (liftIO , MonadIO )
2424import Data.Char (chr )
25- import Data.Data (Data , Typeable )
25+ import Data.Data (Data )
2626import Data.Default.Class (Default (.. ))
2727import Language.Haskell.TH (Exp , Q , Pat )
2828import Language.Haskell.TH.Quote (QuasiQuoter (.. ), dataToExpQ , dataToPatQ )
@@ -61,20 +61,20 @@ data Permissions = Permissions
6161 { readable :: Bool
6262 , writable :: Bool
6363 , executable :: Bool
64- } deriving (Eq , Ord , Read , Show , Typeable , Data )
64+ } deriving (Eq , Ord , Read , Show , Data )
6565
6666data UserType =
6767 Owner
6868 | Group
6969 | Others
7070 | All
71- deriving (Eq , Ord , Read , Show , Typeable , Data )
71+ deriving (Eq , Ord , Read , Show , Data )
7272
7373data UserTypePerm =
7474 UserTypePerm
7575 { utype :: UserType
7676 , permssions :: Permissions
77- } deriving (Eq , Ord , Read , Show , Typeable , Data )
77+ } deriving (Eq , Ord , Read , Show , Data )
7878
7979instance Default Permissions where
8080 def = Permissions
0 commit comments