Fix html structure in money normal member view

diff --git a/money.mlt b/money.mlt
index abd34a8..339fa40 100644 (file)
--- a/money.mlt
+++ b/money.mlt
@@ -645,7 +645,6 @@ Co-op balance: $<% #amount (Balance.lookupBalance (valOf (Balance.balanceNameToI
 <!--h3>Your balance: $<% #amount bal %></h3-->
 
 <% if (iff Group.inGroupName "money" then $"lookback" = "" else $"audit" <> "") then %><h3>Sum of all active balances: $<% Balance.sumOwnedBalances () %></h3><% end %>
-<div>
 <div class="payment-tile">
   <h3>Financial Information</h3>
 <a href="money?cmd=list">List all transactions</a><br>
@@ -660,7 +659,11 @@ Co-op balance: $<% #amount (Balance.lookupBalance (valOf (Balance.balanceNameToI
 
 <a href="?cmd=delinq">Drop pledges of delinquent members</a><br>
 <a href="?lookback=20">Switch to regular member view</a><br>
+
+<% end %>
 </div>
+
+<% if (Group.inGroupName "money" and $"lookback" = "") or $"audit" <> "" then %>
 <div class="payment-tile">
   <h3>New Transaction</h3>
 <a href="money?cmd=bill">Bill for the co-op</a><br>
@@ -672,6 +675,7 @@ Co-op balance: $<% #amount (Balance.lookupBalance (valOf (Balance.balanceNameToI
 <a href="money?cmd=equalize">Equalize balances</a><br>
 <br>
 </div>
+
 <div>
 <div class="payment-tile">
 <h3>Look up a PayPal e-mail address</h3>
@@ -741,7 +745,10 @@ end %>
 </table>
 
 <% else %>
+<div class="payment-tile">
+<p>
 <a href="?audit=1">Switch to audit view</a><br>
+</p></div>
 <% val lookback = case $"lookback" of "" => 20 | "inf" => 0 | lb => Web.stoi lb;
    @payment [] %>