Fix up joining with new header/footer, too
authorAdam Chlipala <adamc@hcoop.net>
Thu, 24 Nov 2005 19:57:00 +0000 (19:57 +0000)
committerAdam Chlipala <adamc@hcoop.net>
Thu, 24 Nov 2005 19:57:00 +0000 (19:57 +0000)
app/Makefile [new file with mode: 0644]
app/footer.mlt
app/header.mlt
app/header.setTitle [new file with mode: 0644]
app/join.mlt

diff --git a/app/Makefile b/app/Makefile
new file mode 100644 (file)
index 0000000..a4b2a23
--- /dev/null
@@ -0,0 +1,8 @@
+all: header.mlt footer.mlt
+
+header.mlt: /etc/hcoop.header header.setTitle
+       cat header.setTitle >header.mlt
+       hcoop_header "<% Web.html title %>" >>header.mlt
+
+footer.mlt: /etc/hcoop.footer
+       hcoop_footer >>footer.mlt
index 8634a86..985a640 100644 (file)
@@ -1 +1,3 @@
-</body></html>
\ No newline at end of file
+</body></html></div>
+
+</body></html>
index de7c81a..b8d9d05 100644 (file)
@@ -1,9 +1,17 @@
-<html><head>
 <% val title =
        case $"title" of
-                 "" => "Hcoop"
-               | t => ("Hcoop: " ^ t) %>
+                 "" => "HCoop"
+               | t => ("HCoop: " ^ t) %>
+<html><head>
+<link rel="stylesheet" type="text/css" href="http://hcoop.net/hcoop.css" />
 <title><% Web.html title %></title>
 </head><body>
 
-<h2><b><% Web.html title %></b></h2>
+<div class="main">
+
+<div class="title">
+<img class="globe" src="http://hcoop.net/globe.gif" />
+<h1><% Web.html title %></h1>
+</div>
+
+<div class="break"></div>
diff --git a/app/header.setTitle b/app/header.setTitle
new file mode 100644 (file)
index 0000000..2fe7d16
--- /dev/null
@@ -0,0 +1,4 @@
+<% val title =
+       case $"title" of
+                 "" => "HCoop"
+               | t => ("HCoop: " ^ t) %>
index 95e8189..a136311 100644 (file)
        val other = $"other";
 
        if $"agree" <> "on" then
-               %><h3><b>You must accept the Terms of Service!</b></h3><%
+               %><h3>You must accept the Terms of Service!</h3><%
        elseif name = "" then
-               %><h3><b>Please enter a username</b></h3><%
+               %><h3>Please enter a username</h3><%
        elseif rname = "" then
-               %><h3><b>Please enter the potential member's name</b></h3><%
+               %><h3>Please enter the potential member's name</h3><%
        elseif (iff minor then gname = "" else false) then
-               %><h3><b>Please enter your name, as legal guardian<b></h3><%
+               %><h3>Please enter your name, as legal guardian<b></h3><%
        elseif email = "" then
-               %><h3><b>Please enter your contact e-mail address</b></h3><%
+               %><h3>Please enter your contact e-mail address</h3><%
        elseif uses = "" then
-               %><h3><b>Please enter your proposed uses</b></h3><%
+               %><h3>Please enter your proposed uses</h3><%
        elseif not (App.validUser name) then
-               %><h3><b>Invalid requested username</b></h3><%
+               %><h3>Invalid requested username</h3><%
        elseif App.userExists name then
-               %><h3><b>That username is already in use.</b><h3><%
+               %><h3>That username is already in use.</b><h3><%
        elseif not (App.validEmail email) then
-               %><h3><b>Invalid e-mail address</b></h3><%
+               %><h3>Invalid e-mail address</h3><%
        elseif not (App.apply { name = name, rname = rname, email = email,
                                gname = (case gname of "" => NONE | _ => SOME gname),
                                forward = forward, uses = uses, other = other }) then
-               %><h3><b>Error sending confirmation e-mail</b></h3><%
+               %><h3>Error sending confirmation e-mail</h3><%
        else
-               %><h3><b>Application recorded</b></h3>
+               %><h3>Application recorded</h3>
                Check your e-mail for a message with further instructions.<%
        end
 else
@@ -41,22 +41,22 @@ else
 
 <form action="join" method="post">
 <input type="hidden" name="cmd" value="app">
-<table>
-<tr> <td align="right" valign="top"><b>Desired username</b>:</td> <td><input name="name"><br>
+<table class="blanks">
+<tr> <td>Desired username:</td> <td><input name="name"><br>
        You should follow usual UNIX conventions, including limiting yourself to lowercase letters and at most 8 characters. It's helpful to pick a name you wouldn't mind using to identify yourself to both strangers and friends. Something based on your "real" name is a safe bet.<br>
        You also don't need to worry about whether or not the username you want is already taken. This application system will let you know if that is the case. You can probably use a shorter and simpler name than you are accustomed to getting at larger services, so we encourage you to try such names first.</td> </tr>
 <% if minor then %>
-<tr> <td align="right"><b>New member's "real" name</b>:</td> <td><input name="rname"></td> </tr>
-<tr> <td align="right"><b>Legal guardian's name</b>:</td> <td><input name="gname"></td> </tr>
+<tr> <td>New member's "real" name:</td> <td><input name="rname"></td> </tr>
+<tr> <td>Legal guardian's name:</td> <td><input name="gname"></td> </tr>
 <% else %>
-<tr> <td align="right"><b>Your "real" name</b>:</td> <td><input name="rname"></td> </tr>
+<tr> <td>Your "real" name:</td> <td><input name="rname"></td> </tr>
 <% end %>
-<tr> <td align="right"><b>Contact e-mail address</b></td> <td><input name="email"></td> </tr>
-<tr> <td align="right" valign="top"><input type="checkbox" name="forward"></td> <td>Check this box if you would like to use hcoop as your primary e-mail provider.<br>
+<tr> <td>Contact e-mail address</td> <td><input name="email"></td> </tr>
+<tr> <td><input type="checkbox" name="forward"></td> <td>Check this box if you would like to use hcoop as your primary e-mail provider.<br>
        If you don't select this option and you are approved to join, e-mail to your account will be forwarded to the address you provide here.<br>
        You can change this option later, but we'll probably have helpful things to e-mail you as soon as you join.  It's important that we be able to reach members reliably, so please don't decide to use us as your primary e-mail provider unless you can commit to checking your hcoop mailbox just as often as any other personal accounts you have.</td> </tr>
-<tr> <td align="right" valign="top"><b>How do you plan to use a hcoop membership?</b></td> <td><textarea name="uses" rows="5" cols="80" wrap="soft"></textarea></td> </tr>
-<tr> <td align="right" valign="top"><b>Any other information about yourself</b></td> <td><textarea name="other" rows="5" cols="80" wrap="soft"></textarea></td> </tr>
+<tr> <td>How do you plan to use a hcoop membership?</td> <td><textarea name="uses" rows="5" cols="80" wrap="soft"></textarea></td> </tr>
+<tr> <td>Any other information about yourself</td> <td><textarea name="other" rows="5" cols="80" wrap="soft"></textarea></td> </tr>
 </table>
 
 <br><hr><br>