<%
+ ref first = true;
+ ref found = false;
+ val votes = App.votes (#id appl);
+ foreach (id, name) in votes do
+ if first then
+ first := false
+ else
+ %>, <%
+ end
+ %><% name %><%
+ if id = you then
+ found := true
+ %> [Unvote]<%
+ end
+ end %> <% if (iff board then not found else false) then %>[Vote]<% end %>
+
Username:
<% #name appl %>
+
Real name:
<% Web.html (#rname appl) %>
+
Forward e-mail?
<% if #forward appl then %>yes<% else %>no<% end %>
<%
ref first = true;
ref found = false;
@@ -80,6 +110,7 @@ elseif $"cmd" = "approved" then
Forward e-mail?
<% if #forward appl then %>yes<% else %>no<% end %>
Proposed uses:
<% Web.htmlNl (#uses appl) %>
Other information:
<% Web.htmlNl (#other appl) %>
+ <% if #status appl = App.BEING_ADDED then %>
WARNING: Someone already followed the add link for this application. Maybe he forgot to finish.
<% end %>
<% if root then %>
@@ -91,10 +122,10 @@ elseif $"add" <> "" then
showNormal := false;
val id = Web.stoi ($"add");
val appl = App.lookupApp id;
- App.add id %>
+ App.preAdd id %>
First, run this on deleuze:
-
magic-create-user-wrapper <% #name appl %> "<% #rname appl %>"<% if #forward appl then %> "<% #email appl %>"<% end %>
+
new-user <% #name appl %> "<% #rname appl %>"<% if #forward appl then %> "<% #email appl %>"<% end %>