%# $Id: layout.mc,v 1.3 2006-09-19 11:13:58 mike Exp $ <%args> $debug => undef $title $component %args> <%once> use lib "/usr/local/src/cvs/irspy/lib"; use ZOOM::IRSpy; %once> <%perl> my $text = $m->scomp($component, %ARGS); %perl> <& /chrome/head.mc, title => $title &>
<& /chrome/menu.mc &> | <% $text %> |