X-Git-Url: http://git.hcoop.net/bpt/portal.git/blobdiff_plain/746fe7b2ca1a08db9aca3c7d2e607ba58fdc4add..a483e18c6bb5943a39a3bd67abe4d9a0adfcf76a:/apps.mlt
diff --git a/apps.mlt b/apps.mlt
index 00c2cfd..5fe3f2a 100644
--- a/apps.mlt
+++ b/apps.mlt
@@ -1,7 +1,7 @@
<% @header [("title", ["Membership applications"])];
val you = Init.getUserId ();
-val board = Group.inGroupName "board";
+val board = Group.reallyInGroupName "board";
val root = Group.inGroupNum 0;
ref showNormal = true;
@@ -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;
@@ -86,7 +86,7 @@ elseif $"cmd" = "approved" then
foreach appl in App.listApps App.ACCEPTED do %>
- Received: | <% #applied appl %> |
+ Received: | <% #applied appl %> (<% Util.diffFromNow (#applied appl) %> ago) |
Approved by: | <%
ref first = true;
ref found = false;
@@ -124,7 +124,7 @@ elseif $"add" <> "" then
App.add 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 %>
| |