X-Git-Url: http://git.hcoop.net/hcoop/portal.git/blobdiff_plain/f3a41f3b49333bf83355b911d5a6b7a1a64fd634..HEAD:/apps.mlt
diff --git a/apps.mlt b/apps.mlt
index c5c5d4c..2488349 100644
--- a/apps.mlt
+++ b/apps.mlt
@@ -13,7 +13,7 @@ if $"show" <> "" then
val appl = App.lookupApp (#app user) %>
- Received: | <% #applied appl %> |
+ Received: | <% #applied appl %> (<% Util.diffFromNow (#applied appl) %> ago) |
Approved by: | <%
ref first = true;
ref found = false;
@@ -32,6 +32,7 @@ if $"show" <> "" then
end %> <% if (iff board then not found else false) then %>[Vote]<% end %> |
Username: | <% #name appl %> |
Real name: | <% Web.html (#rname appl) %> |
+ E-mail: | <% #email appl %> |
Forward e-mail? | <% if #forward appl then %>yes<% else %>no<% end %> |
Proposed uses: | <% Web.htmlNl (#uses appl) %> |
Other information: | <% Web.htmlNl (#other appl) %> |
@@ -83,10 +84,10 @@ elseif $"cmd" = "approved" then
%>Pending applications
<%
- foreach appl in App.listApps App.ACCEPTED do %>
+ foreach appl in App.listApps [App.ACCEPTED, App.BEING_ADDED] do %>
- Received: | <% #applied appl %> |
+ Received: | <% #applied appl %> (<% Util.diffFromNow (#applied appl) %> ago) |
Approved by: | <%
ref first = true;
ref found = false;
@@ -103,13 +104,11 @@ elseif $"cmd" = "approved" then
|
E-mail address: | <% #email appl %> |
<% switch #paypal appl of
SOME s => %> PayPal: | <% s %> |
- <% end;
- switch #checkout appl of
- SOME s => %> Google Checkout: | <% s %> |
<% end %>
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 %>
@@ -121,9 +120,9 @@ 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:
+First, run this on gibran:
new-user <% #name appl %> "<% #rname appl %>"<% if #forward appl then %> "<% #email appl %>"<% end %>