X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fchrome%2Flayout.mc;h=1b4dd202c861faa91f68760855b6bcf7f01cf30f;hb=dd99038c74f386123d25ba38da05d3b1b81653a8;hp=d00a496145d90bbb3b1f4748833badff5ce2cea9;hpb=b34e426b9e12c34f941fe2d66fdf0a3a967dd09b;p=irspy-moved-to-github.git diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc index d00a496..1b4dd20 100644 --- a/web/htdocs/chrome/layout.mc +++ b/web/htdocs/chrome/layout.mc @@ -1,16 +1,18 @@ -%# $Id: layout.mc,v 1.2 2006-09-15 16:49:05 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 &> @@ -24,14 +26,9 @@ my $text = $m->scomp($component, %ARGS); - + - -
<& /chrome/menu.mc &>   - <% $text %> - - -<& /chrome/pmenu.mc &> +<& $component, %ARGS &>