X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Rakka.git;a=blobdiff_plain;f=Rakka%2FStorage%2FTypes.hs;h=e9b848ba8cdab1527fba5db257c9ceed764288d5;hp=28184a676e574d54989cecc80af2301dbb95a5b2;hb=4abf7df08bf0a614ea8179e8d1d69a17aac4f197;hpb=2ff55c9709fde69968ef97f61b8f395e58b3ec8c diff --git a/Rakka/Storage/Types.hs b/Rakka/Storage/Types.hs index 28184a6..e9b848b 100644 --- a/Rakka/Storage/Types.hs +++ b/Rakka/Storage/Types.hs @@ -8,6 +8,7 @@ module Rakka.Storage.Types where import Control.Concurrent.STM +import Data.Time import Rakka.Page import Subversion.Repository import Subversion.Types @@ -38,7 +39,9 @@ data SearchResult data HitPage = HitPage { hpPageName :: !PageName - , hpPageRev :: !RevNum + , hpPageRev :: RevNum + , hpLastMod :: UTCTime + , hpSummary :: Maybe String , hpSnippet :: [SnippetFragment] } deriving (Show, Eq)