Tweakadeedooda while running through our first real application in a while

[hcoop/zz_old/portal.git] / quotas.mlt

<% @header [("title", ["Disk usage stats"])] %>

<table>
<tr> <td align="right"><b>User</b></td> <td><b>Blocks</b></td> <td><b>Files</b></td> </tr>
<tr><td>&nbsp;</td></tr>

<% foreach du in Stats.getDiskUsage () do %>
	<tr><td align="right"><%
	val id = Init.userNameToId (#uname du);
	switch id of
		  SOME id => %><a href="user?id=<% id %>"><%
	end
	%><% Web.html (#uname du) %><%
	switch id of
		  SOME id => %></a><%
	end
%></td> <td><% #blocks du %></td> <td><% #files du %></td> </tr>
<% end %>

</table>

</body></html>