Minor update for members directory under new website

diff --git a/static/gen.sml b/static/gen.sml
index c8a3a85..2059f92 100644 (file)
--- a/static/gen.sml
+++ b/static/gen.sml
@@ -10,7 +10,7 @@ end
 
 structure NM = BinaryMapFn(IntKey)
 
-val outputDir = "/home/hcoop/new-hcoop-website/"
+val outputDir = "/home/hcoop/public_html/"
 
 fun generate () =
     let
@@ -49,7 +49,7 @@ fun generate () =
                        if not isAnon then
                            (TextIO.output (outf, "<tr> <td><a href=\"member/");
                             TextIO.output (outf, name);
-                            TextIO.output (outf, ".shtml\">");
+                            TextIO.output (outf, "\">");
                             TextIO.output (outf, name);
                             TextIO.output (outf, "</a></td> <td>");
                             TextIO.output (outf, rname);
@@ -91,7 +91,7 @@ fun generate () =
                                val outf = TextIO.openOut (String.concat [outputDir, "member/", name, ".shtml"])
 
                                val _ = header (outf, "HCoop Member: " ^ name)
-                               val _ = TextIO.output (outf, "<p><a href=\"/members.shtml\">Return to members directory</a></p>\n\n");
+                               val _ = TextIO.output (outf, "<p><a href=\"/members\">Return to members directory</a></p>\n\n");
                                val _ = TextIO.output (outf, "<table>\n<tr> <td align=\"right\"><b>Member</b>:</td> <td>")
                                val _ = TextIO.output (outf, name)
                                val _ = TextIO.output (outf, "</td> </tr>\n<tr> <td align=\"right\"><b>Name</b>:</td> <td>")
@@ -297,7 +297,7 @@ fun generate () =
                     TextIO.output (outf, Web.html descr);
                     TextIO.output (outf, "</td> <td><a href=\"member/");
                     TextIO.output (outf, name);
-                    TextIO.output (outf, ".shtml\">");
+                    TextIO.output (outf, "\">");
                     TextIO.output (outf, name);
                     TextIO.output (outf, "</a></td> </tr>\n"))
            in