src/Repositories.hs Modified

@@ -40,9 +40,6 @@
     repos <- loadRepos env
     mapM (processRepo env repos) repos
 
-----------------------------------------------------------------------------------------
--- Private -----------------------------------------------------------------------------
-
 {-
 Get paths along with their descriptions.
 -}

src/Index.hs Modified

@@ -24,9 +24,6 @@
 runIndex :: Env -> [Repo] -> IO ()
 runIndex env repos = mapM_ (runIndexFile env repos) . envIndexTemplates $ env
 
-----------------------------------------------------------------------------------------
--- Private -----------------------------------------------------------------------------
-
 runIndexFile :: Env -> [Repo] -> Template -> IO ()
 runIndexFile env repos template = do
     let output = combine (toFilePath . envOutputDirectory $ env) . toFilePath . templatePath $ template