X-Git-Url: http://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=Main.hs;h=81f41a5f345cc1443224ff05ea0f8968f37f1556;hb=fb86cb6941e466fd43ce45338024c79d0fdb33a2;hp=77c17a16a4b5c212b9268e22a827baf456f2d8a4;hpb=4e428cf86da68b72ef8fdff87990e7c953c8f12e;p=Rakka.git diff --git a/Main.hs b/Main.hs index 77c17a1..81f41a5 100644 --- a/Main.hs +++ b/Main.hs @@ -11,6 +11,9 @@ import Rakka.Resource.JavaScript import Rakka.Resource.PageEntity import Rakka.Resource.Object import Rakka.Resource.Render +import Rakka.Resource.Search +import Rakka.Resource.SystemConfig +import Rakka.Resource.TrackBack import Rakka.Storage import Subversion import System.Console.GetOpt @@ -137,11 +140,16 @@ main = withSubversion $ resTree :: Environment -> ResTree resTree env - = mkResTree [ ([] , resIndex env) - , (["checkAuth"], resCheckAuth env) - , (["js" ], javaScript ) - , (["object" ], resObject env) - , (["render" ], resRender env) + = mkResTree [ ([] , resIndex env) + , (["checkAuth" ], resCheckAuth env) + , (["js" ], javaScript ) + , (["object" ], resObject env) + , (["render" ], resRender env) + , (["search" ], resSearch env) + , (["search.html" ], resSearch env) + , (["search.xml" ], resSearch env) + , (["systemConfig"], resSystemConfig env) + , (["trackback" ], resTrackBack env) ]