+icons
[www.jankratochvil.net.git] / project / PortDiag / Index.html.pl
index b3b6b94..12d64e8 100755 (executable)
@@ -27,8 +27,8 @@ use warnings;
 
 BEGIN{ open F,"Makefile"; our $top_dir=pop @{[split /\s/,(grep /^top_srcdir/,<F>)[0]]}; eval "use lib '$top_dir'"; close F; }
 use My::Web;
-use My::Project;
-use project::PortDiag::ListItem;
+Wuse 'My::Project';
+Wuse 'project::PortDiag::ListItem';
 
 
 My::Project->init_project(
@@ -36,6 +36,8 @@ My::Project->init_project(
                "ListItem"=>\@project::PortDiag::ListItem::ListItem,
                );
 
-print '<table border="0"><tr><td align="center">'.My::Web::img("PortDiag","PortDiag Snapshot").'</td></tr></table>'."\n";
+
+print centerimg "PortDiag","PortDiag Snapshot";
+
 
 My::Web->footer();