X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fchrome%2Flayout.mc;h=1b4dd202c861faa91f68760855b6bcf7f01cf30f;hb=dd99038c74f386123d25ba38da05d3b1b81653a8;hp=c9931bcbf84992d5f1e420923a533c893c01d3c7;hpb=454bc84b3f772eca3afe7d7d378b922917e7f885;p=irspy-moved-to-github.git diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc index c9931bc..1b4dd20 100644 --- a/web/htdocs/chrome/layout.mc +++ b/web/htdocs/chrome/layout.mc @@ -1,37 +1,34 @@ -%# $Id: layout.mc,v 1.1 2006-09-14 15:17:48 mike Exp $ +%# $Id: layout.mc,v 1.9 2006-09-28 16:03:08 mike Exp $ <%args> $debug => undef $title $component <%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::Record qw(xml_encode); -<%perl> -my $text = $m->scomp($component, %ARGS); - <& /chrome/head.mc, title => $title &> - <& /chrome/bannerrow.mc, title => $title &> +<& /chrome/bannerrow.mc, title => $title &>
- <& /chrome/lmenu.mc &> +<& /chrome/lmenu.mc &>

- + - -
- <& /chrome/menu.mc &> +<& /chrome/menu.mc &>   - <% $text %> - - - <& /chrome/pmenu.mc &> +<& $component, %ARGS &>