X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fchrome%2Flayout.mc;h=1b4dd202c861faa91f68760855b6bcf7f01cf30f;hb=dd99038c74f386123d25ba38da05d3b1b81653a8;hp=a5fefe8f592724cb0e2f99cb4d3bada0a0a3bdb4;hpb=23cbbcae5ae046c840d65d350b1e36019f5665cd;p=irspy-moved-to-github.git diff --git a/web/htdocs/chrome/layout.mc b/web/htdocs/chrome/layout.mc index a5fefe8..1b4dd20 100644 --- 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.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,9 +26,10 @@ my $text = $m->scomp($component, %ARGS); - +
<& /chrome/menu.mc &>   - <% $text %> +<& $component, %ARGS &> +
<& /chrome/tail.mc &>