@@ 336,7 336,7 @@ title, url-slug, body."
                              (w/stdout dest
                                        (prn-codegen-page page!title page!url-slug page!body analytics-script page!headers config)))))))
 
-(def prn-html-page (title url-slug navbar-div options infile-after-options analytics-script config (o tag-map (obj)))
+(def prn-html-page (title url-slug navbar-div options infile-after-options analytics-script config (o tag-map (obj)) (o mailing-list-div nil))
   (prn-page
    title
    url-slug

          
@@ 350,7 350,9 @@ title, url-slug, body."
                      (para (sortable-date-to-readable-date it))))
          (whilet line (readline infile-after-options)
                  (prn line)))
-    (prn-tag-block-for-page options tag-map))
+    (prn-tag-block-for-page options tag-map)
+    (when mailing-list-div
+      (prn mailing-list-div)))
    analytics-script
    options!page-specific-headers
    config))