Pull in xml_encode()
[irspy-moved-to-github.git] / web / htdocs / chrome / layout.mc
index c9931bc..14e7608 100644 (file)
@@ -1,4 +1,4 @@
-%# $Id: layout.mc,v 1.1 2006-09-14 15:17:48 mike Exp $
+%# $Id: layout.mc,v 1.7 2006-09-25 16:47:36 mike Exp $
 <%args>
 $debug => undef
 $title
 <%args>
 $debug => undef
 $title
@@ -7,31 +7,24 @@ $component
 <%once>
 use lib "/usr/local/src/cvs/irspy/lib";
 use ZOOM::IRSpy;
 <%once>
 use lib "/usr/local/src/cvs/irspy/lib";
 use ZOOM::IRSpy;
+use ZOOM::IRSpy::Record qw(xml_encode);
 </%once>
 </%once>
-<%perl>
-my $text = $m->scomp($component, %ARGS);
-</%perl>
 <& /chrome/head.mc, title => $title &>
   <table border="0" cellpadding="0" cellspacing="0" width="100%">
 <& /chrome/head.mc, title => $title &>
   <table border="0" cellpadding="0" cellspacing="0" width="100%">
-   <& /chrome/bannerrow.mc, title => $title &>
+<& /chrome/bannerrow.mc, title => $title &>
   </table>
   <table border="0" cellpadding="0" cellspacing="0" width="100%">
   </table>
   <table border="0" cellpadding="0" cellspacing="0" width="100%">
-   <& /chrome/lmenu.mc &>
+<& /chrome/lmenu.mc &>
   </table>
   <p></p>
   <table border="0" cellpadding="0" cellspacing="0" width="100%">
    <tr>
     <td valign="top" class="panel1">
   </table>
   <p></p>
   <table border="0" cellpadding="0" cellspacing="0" width="100%">
    <tr>
     <td valign="top" class="panel1">
-     <& /chrome/menu.mc &>
+<& /chrome/menu.mc &>
     </td>
     </td>
-    <td class="spacer"></td>
+    <td class="spacer">&nbsp;</td>
     <td valign="top">
     <td valign="top">
-     <% $text %>
-    </td>
-    <td class="spacer">
-    </td>
-    <td valign="top" class="panel2">
-     <& /chrome/pmenu.mc &>
+<& $component, %ARGS &>
     </td>
    </tr>
   </table>
     </td>
    </tr>
   </table>