From 217208e3f342d31da541b88af8d06aabbf322f86 Mon Sep 17 00:00:00 2001
From: Miguel <m.i@gmx.at>
Date: Sun, 17 Feb 2019 12:11:40 +0100
Subject: fixed hidden directories filter

---
 src/WWWStaticusPlugins.hs | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'src/WWWStaticusPlugins.hs')

diff --git a/src/WWWStaticusPlugins.hs b/src/WWWStaticusPlugins.hs
index a569ca9..ccf82bc 100644
--- a/src/WWWStaticusPlugins.hs
+++ b/src/WWWStaticusPlugins.hs
@@ -55,12 +55,10 @@ staticusPluginsDefault=[ staticusPluginInit
                        ]
 
 -- |Creates target directory and sets basic params in map:
--- outdir 
 staticusPluginInit::StaticusPlugin
 staticusPluginInit = StaticusPlugin "init" id runIO
      where runIO m = 
             do print $ par "path" m
-               print $ outdir
                when (not isHome) (createDirectory outdir)
                c    <- getDirList (par "path" m)
                t    <- getDirList (par "dir_in" m)
@@ -68,7 +66,6 @@ staticusPluginInit = StaticusPlugin "init" id runIO
                let submenu= if isHome then "" else concat $ map (\x->"<li><a href=\""++outdir++"/"++x++"/index.html\">"++x++"</a></li>") (menu c)
                let breadcrumbs=concat $ map (\x->x) brc
                let breadcrumbs=""
-              --TODO: check top dirs until file found! add ./config
                md   <- readFile $ par "path" m++"/"++"index.md"
                tmpl <- readFile $ par "dir_in" m++"/"++"template.html"
                return $ M.union (M.fromList [ ("outdir",outdir)
@@ -119,4 +116,3 @@ staticusPluginWrite = StaticusPlugin "writer" id runIO
     where runIO m = do
                      writeFile ((par "outdir" m)++"/index.html") (par "final" m)
                      return m
-
-- 
cgit v1.2.3