From ac6047c57d7b2c1ccbea112c0c2bdefcbc2f251d Mon Sep 17 00:00:00 2001 From: Daniel Gröber Date: Fri, 29 Mar 2019 03:43:19 +0100 Subject: Add accessor for ChModuleName newtype --- src/CabalHelper/Shared/InterfaceTypes.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/CabalHelper/Shared/InterfaceTypes.hs b/src/CabalHelper/Shared/InterfaceTypes.hs index 5cdd98c..37758bc 100644 --- a/src/CabalHelper/Shared/InterfaceTypes.hs +++ b/src/CabalHelper/Shared/InterfaceTypes.hs @@ -58,7 +58,7 @@ data ChLibraryName = ChMainLibName | ChSubLibName String deriving (Eq, Ord, Read, Show, Generic) -newtype ChModuleName = ChModuleName String +newtype ChModuleName = ChModuleName { unChModuleName :: String } deriving (Eq, Ord, Read, Show, Generic) data ChComponentInfo = ChComponentInfo -- cgit v1.2.3