@@ -93,8 +93,8 @@ instance Renderable CustomPage where
9393
9494-- | PagePath is a class that wraps a FilePath. This is used to render Pages
9595-- without reading them first through use of caching.
96−data PagePath = PagePath FilePath
97− deriving (Ord, Eq, Read, Show)
96+newtype PagePath = PagePath FilePath
97+ deriving (Ord, Eq, Read, Show)
9898
9999-- | Create a PagePath from a FilePath.
100100createPagePath :: FilePath -> PagePath