X-Git-Url: https://git.cielonegro.org/gitweb.cgi?a=blobdiff_plain;f=Main.hs;h=81f41a5f345cc1443224ff05ea0f8968f37f1556;hb=4f689140d417db80cfa94e932dcfdbfdd428d8c7;hp=4328e707b21c01614d0d7189c0c030a5a3665342;hpb=d843e97aa04278677eaede4e50ef680af32867e7;p=Rakka.git diff --git a/Main.hs b/Main.hs index 4328e70..81f41a5 100644 --- a/Main.hs +++ b/Main.hs @@ -11,6 +11,8 @@ 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 @@ -138,12 +140,16 @@ main = withSubversion $ resTree :: Environment -> ResTree resTree env - = mkResTree [ ([] , resIndex env) - , (["checkAuth"], resCheckAuth env) - , (["js" ], javaScript ) - , (["object" ], resObject env) - , (["render" ], resRender env) - , (["trackback"], resTrackBack 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) ]