Geography database

[bpt/portal.git] / user.mlt

diff --git a/user.mlt b/user.mlt
index 498fc49..7316db6 100644 (file)
--- a/user.mlt
+++ b/user.mlt
@@ -8,6 +8,16 @@ val user = Init.lookupUser id;
 <tr> <td align="right"><b>Real name</b>:</td> <td><% Web.html (#rname user) %></td> </tr>
 <tr> <td align="right"><b>Hcoop e-mail</b>:</td> <td><a href="mailto:<% #name user %>@hcoop.net"><tt><% #name user %>@hcoop.net</tt></a></td> </tr>
 <tr> <td align="right"><b>Joined</b>:</td> <td><% #joined user %></td> </tr>
+<tr> <td align="right"><b>Locations</b>:</td> <td><%
+       ref first = true;
+       foreach loc in Location.userLocations id do
+               if first then
+                       first := false
+               else
+                       %>, <%
+               end
+               %><a href="location?id=<% #id loc %>"><% Web.html (#name loc) %></a><%
+       end %></td> </tr>
 
 <tr> </tr>