-%# $Id: layout.mc,v 1.2 2006-09-15 16:49:05 mike Exp $
+%# $Id: layout.mc,v 1.10 2006-10-20 16:56:07 mike Exp $
<%args>
$debug => undef
$title
$component
</%args>
<%once>
-use lib "/usr/local/src/cvs/irspy/lib";
-use ZOOM::IRSpy;
+BEGIN {
+ use vars qw($LIBDIR);
+ $LIBDIR = $r->dir_config("IRSpyLibDir");
+}
+use lib $LIBDIR;
+use ZOOM::IRSpy::Web;
+use ZOOM::IRSpy qw(irspy_xpath_context xml_encode);
</%once>
-<%perl>
-my $text = $m->scomp($component, %ARGS);
-</%perl>
<& /chrome/head.mc, title => $title &>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<& /chrome/bannerrow.mc, title => $title &>
<td valign="top" class="panel1">
<& /chrome/menu.mc &>
</td>
- <td class="spacer"></td>
+ <td class="spacer"> </td>
<td valign="top">
- <% $text %>
- </td>
- <td class="spacer">
- </td>
- <td valign="top" class="panel2">
-<& /chrome/pmenu.mc &>
+<& $component, %ARGS &>
</td>
</tr>
</table>