- srPageName :: !PageName
- , srPageRev :: !RevNum
- , srSnippet :: [SnippetFragment]
+ srTotal :: !Int
+ , srPages :: ![HitPage]
+ }
+ deriving (Show, Eq)
+
+
+data HitPage
+ = HitPage {
+ hpPageName :: !PageName
+ , hpPageRev :: !RevNum
+ , hpSnippet :: [SnippetFragment]