Get irspy_xpath_context() and xml_encode() from ZOOM::IRSpy

[irspy-moved-to-github.git] / web / htdocs / chrome / layout.mc

diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc
index a5fefe8..600b9f0 100644 (file)
--- a/web/htdocs/chrome/layout.mc
+++ b/web/htdocs/chrome/layout.mc
@@ -1,16 +1,18 @@
-%# $Id: layout.mc,v 1.3 2006-09-19 11:13:58 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 &>
@@ -24,9 +26,10 @@ my $text = $m->scomp($component, %ARGS);
     <td valign="top" class="panel1">
 <& /chrome/menu.mc &>
     </td>
-    <td class="spacer"></td>
+    <td class="spacer">&nbsp;</td>
     <td valign="top">
-     <% $text %>
+<& $component, %ARGS &>
+    </td>
    </tr>
   </table>
 <& /chrome/tail.mc &>