pass frontpage-filepaths into prn-frontpage
1 files changed, 3 insertions(+), 8 deletions(-)

M site.arc
M site.arc +3 -8
@@ 74,7 74,7 @@ 
                      pregenerated-folder))
       (msince start-time "Generating frontpage: ")
       (prn-frontpage published-files
-                     frontpage-folder
+                     frontpage-filepaths
                      output-folder
                      navbar-div
                      analytics-script

          
@@ 380,13 380,8 @@ title, url-slug, body."
                                       (let next-page (tags.tag (+ 1 this-pos))
                                            (link (string next-page!title " >") next-page!url-slug))))))))))
 
-(def prn-frontpage (published-files frontpage-folder output-folder navbar-div analytics-script config)
-  (withs (frontpage-files (and frontpage-folder
-                              (dir-exists frontpage-folder)
-                              (keep file-exists
-                                    (map [string frontpage-folder "/" _]
-                                         (dir frontpage-folder))))
-          files (+ published-files frontpage-files)
+(def prn-frontpage (published-files frontpage-files output-folder navbar-div analytics-script config)
+  (withs (files (+ published-files frontpage-files)
           sorted-options (get-sorted-options-for-files files)
           public-sorted-options (keep page-is-public sorted-options))
       (w/outfile dest (+ output-folder "index.html")