diff options
Diffstat (limited to 'src/Hakyll/Core/Identifier.hs')
-rw-r--r-- | src/Hakyll/Core/Identifier.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Identifier.hs b/src/Hakyll/Core/Identifier.hs index 609e722..ea03e8c 100644 --- a/src/Hakyll/Core/Identifier.hs +++ b/src/Hakyll/Core/Identifier.hs @@ -10,6 +10,7 @@ -- -- * @error/404@ -- +{-# LANGUAGE GeneralizedNewtypeDeriving #-} module Hakyll.Core.Identifier ( Identifier (..) , parseIdentifier @@ -17,6 +18,7 @@ module Hakyll.Core.Identifier ) where import Control.Arrow (second) +import Data.Monoid (Monoid) import GHC.Exts (IsString, fromString) import System.FilePath (joinPath) @@ -24,7 +26,7 @@ import System.FilePath (joinPath) -- | An identifier used to uniquely identify a value -- newtype Identifier = Identifier {unIdentifier :: [String]} - deriving (Eq, Ord) + deriving (Eq, Ord, Monoid) instance Show Identifier where show = toFilePath |