X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Rakka.git;a=blobdiff_plain;f=Main.hs;h=c4bb0485b13ff28f9d1ac49e51d427de0b4deb47;hp=02a4cf4702996013cfdcc6dc07c6646b1d707bb0;hb=10200315228e613ca2de0b2a5c5e792e721b4ab6;hpb=abf2f6b430739710532b7bdfb6f20566f35f35b5 diff --git a/Main.hs b/Main.hs index 02a4cf4..c4bb048 100644 --- a/Main.hs +++ b/Main.hs @@ -7,6 +7,7 @@ import Network.HTTP.Lucu import OpenSSL import Rakka.Environment import Rakka.Resource.CheckAuth +import Rakka.Resource.DumpRepos import Rakka.Resource.Index import Rakka.Resource.JavaScript import Rakka.Resource.PageEntity @@ -144,6 +145,7 @@ resTree :: Environment -> ResTree resTree env = mkResTree [ ([] , resIndex env) , (["checkAuth" ], resCheckAuth env) + , (["dumpRepos" ], resDumpRepos env) , (["js" ], javaScript ) , (["object" ], resObject env) , (["render" ], resRender env)