X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Rakka.git;a=blobdiff_plain;f=Main.hs;h=1b441ee2725d5b2678e1b944722746f371b9d837;hp=df2cccb5a17ccfd5e37835adb22eeba0c3f709d3;hb=8a7556db44cd91ac0bb52279472bcc2abaa3f18e;hpb=885faf1cabc3f79c90e1885268e2a9138b1ddefb

diff --git a/Main.hs b/Main.hs
index df2cccb..1b441ee 100644
--- a/Main.hs
+++ b/Main.hs
@@ -6,7 +6,7 @@ import           Network.HTTP.Lucu
 import           Rakka.Environment
 import           Rakka.Resource.Index
 import           Rakka.Resource.Object
-import           Rakka.Resource.Page
+import           Rakka.Resource.Render
 import           System.Console.GetOpt
 import           System.Directory
 import           System.Environment
@@ -15,6 +15,7 @@ import           System.Posix.Files
 import           System.Posix.Types
 import           System.Posix.User
 
+
 data CmdOpt
     = OptPortNum   PortNumber
     | OptLSDir     FilePath
@@ -93,7 +94,7 @@ main = do (opts, nonOpts, errors) <- return . getOpt Permute options =<< getArgs
           setUserID  uid
 
           env     <- setupEnv lsdir portNum
-          runHttpd (envLucuConf env) (resTree env) [fallbackPage env]
+          runHttpd (envLucuConf env) (resTree env) [fallbackRender env]
 
           
 resTree :: Environment -> ResTree