[Change links that are generated pointing at ?q= to be ?hoogle=
Neil Mitchell**20080822222310] {
hunk ./src/Web/Action.hs 120
- urlMore = "?q=" +% queryText cq ++ "&start=" ++ show (start+count+1) ++ "#more"
+ urlMore = "?hoogle=" +% queryText cq ++ "&start=" ++ show (start+count+1) ++ "#more"
hunk ./src/Web/Action.hs 127
- qurl (TagHyperlink url x) | "query:" `isPrefixOf` url = TagHyperlink ("?q=" +% drop 6 url) x
+ qurl (TagHyperlink url x) | "query:" `isPrefixOf` url = TagHyperlink ("?hoogle=" +% drop 6 url) x
hunk ./src/Web/Page.hs 75
- search x = "" +& x ++ "
"
+ search x = "" +& x ++ "
"
hunk ./src/Web/Text.hs 53
- url = if "http:" `isPrefixOf` str then str else "?q=" +% str
+ url = if "http:" `isPrefixOf` str then str else "?hoogle=" +% str
}