X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fchrome%2Flayout.mc;h=d44c17a87edd212a4d602273cc13e8f074769d91;hb=856ad8b5a31bdebde3d550c2ba463710ce16de9c;hp=d00a496145d90bbb3b1f4748833badff5ce2cea9;hpb=d5476aa3bc98a17d8c7a5d91ebe6a872a2519896;p=irspy-moved-to-github.git

diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc
index d00a496..d44c17a 100644
--- a/web/htdocs/chrome/layout.mc
+++ b/web/htdocs/chrome/layout.mc
@@ -1,16 +1,19 @@
-%# $Id: layout.mc,v 1.2 2006-09-15 16:49:05 mike Exp $
+%# $Id: layout.mc,v 1.11 2006-10-26 17:22:15 mike Exp $
 <%args>
 $debug => undef
 $title
 $component
 </%args>
 <%once>
-use lib "/usr/local/src/cvs/irspy/lib";
-use ZOOM::IRSpy;
+use URI::Escape;
+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,14 +27,9 @@ 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 %>
-    </td>
-    <td class="spacer">
-    </td>
-    <td valign="top" class="panel2">
-<& /chrome/pmenu.mc &>
+<& $component, %ARGS &>
     </td>
    </tr>
   </table>