X-Git-Url: https://git.hcoop.net/hcoop/portal.git/blobdiff_plain/e5d7949451a92746abca9a0b28a3ab2f43b411f1..4d4f99b5a63275e069c3ca9a515ffe99afbd2e0e:/portal.mlt diff --git a/portal.mlt b/portal.mlt index 37f66a4..3d19c19 100644 --- a/portal.mlt +++ b/portal.mlt @@ -22,11 +22,11 @@ discussion.

Your recent account activity

<% ref running = showBal %> - +
<% foreach (amount, trn) in Money.listUserTransactionsLimit (Init.getUserId (), 5) do %> - - + + <% running := Util.sub (running, amount) end %>
Date Description Amount Balance
<% #d trn %> <% Web.html (#descr trn) %> <% amount %>/<% #amount trn %><% running %>
<% #d trn %> <% Web.html (#descr trn) %> <% amount %>/<% #amount trn %><% running %>
@@ -34,6 +34,20 @@ end %> Balance: $<% showBal %>
Deposit: $<% deposit %> (3 months of dues at the minimal pledge level) +

Pending Stripe Payments

+ + + +<% foreach stripePmt in Money.listUserPendingStripePayments + (Init.getUserId () ) do %> + + + + +<% end %> +
DateNet Amount (After Fees)
<% #paid_on stripePmt %>$<% #net stripePmt %>
+ + <% val polls = Poll.listCurrentPolls (); @@ -68,9 +82,9 @@ val {total, vhosts} = Stats.getWebbwUser {user = Init.getUserName (), last = 0}; switch vhosts of _ :: _ => %>

Your web traffic this month

- <% +
Site Data transferred (kB)
<% foreach e in vhosts do %> - + <% end %>
Site Data transferred (kB)
<% #hostname (#host e) %><% if #ssl (#host e) then %> (SSL)<% end %> [detail]<% #size e %>
<% #hostname (#host e) %><% if #ssl (#host e) then %> (SSL)<% end %> [detail]<% #size e %>
<% end;