X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=templates%2Ffactory%2Ffrontpage;h=ac47269519d5a139266e903387f810278326f5bb;hb=8336096f38373cb23f3481ceafa9a4edab1b049e;hp=3da9ea3fe4c5e41887bec2423d00dc6bd120a62d;hpb=0ad4ba7aa71b7dda17f0b07ccc9d8f0ad3424b82;p=maypole.git

diff --git a/templates/factory/frontpage b/templates/factory/frontpage
index 3da9ea3..ac47269 100644
--- a/templates/factory/frontpage
+++ b/templates/factory/frontpage
@@ -1,37 +1,27 @@
-[% INCLUDE header %]
+[%#
+
+=head1 frontpage
 
-<h2> Main menu </h2>
+This is the frontpage for your Maypole application.
+It shows a list of all tables it is allowed to display.
 
-<TABLE BORDER="0" ALIGN="center" WIDTH="70%">
-<TR>
-<TD ALIGN="left">
-<P>
-<A HREF="/user/list"><IMG SRC="/images/users.png"> Administer users</A>
-</P>
-</TD>
-<TD ALIGN="right">
-<P>
-<A HREF="/computer/list"><IMG SRC="/images/computer.png"> Administer
-computers</A>
-</P>
-</TD>
-</TR>
+=cut
 
-<TR>
-<TD ALIGN="left">
-<P>
-<A HREF="/blog/"><IMG SRC="/images/blog.png"> House blog</A>
-</P>
-</TD>
-<TD ALIGN="right">
-<P>
-<A HREF="/phoneNumber/list"><IMG SRC="/images/phone.png"> Register
-phone calls</A>
-</P>
-</TD>
-</TR>
+#%]
+[% INCLUDE header %]
+<div id="title">
+    [% config.application_name || "A poorly configured Maypole application" %]
+</div>
+<div id="frontpage_list">
+<ul>
+[% FOR table = config.display_tables %]
+    <li>
+        <a href="[% base %]/[%table%]/list">List by [%table %]</a>
+    </li>	
+[% END %]
+</ul>
+</div>
 
-</TABLE>
+[% INCLUDE maypole %]
 
-<BR>
-[% INCLUDE small_blog %]
+[% INCLUDE footer %]