<TABLE BORDER=0 WIDTH="100%" CELLPADDING=0 CELLSPACING=0>
<TR STYLE="padding:0px">
- <TD><%= $no_logo ? '' : '<IMG SRC="image.cgi?logo">' %></TD>
+ <TD><%= $no_logo ? '' : '<IMG SRC="image.cgi?name=logo;agentnum='. $agentnum. '">' %></TD>
<TD WIDTH = "29%"
- STYLE = "background: url(image.cgi?title_left_image) no-repeat left center; padding:0px">
+ STYLE = "background: url(image.cgi?name=title_left_image;agentnum=<%= $agentnum %>) no-repeat left center; padding:0px">
</TD>
<TD WIDTH = "49%"
ALIGN="<%= $title_align || 'left' %>"
- STYLE = "background: url(image.cgi?title_right_image) no-repeat right center; padding:0px">
+ STYLE = "background: url(image.cgi?name=title_right_image;agentnum=<%= $agentnum %>) no-repeat right center; padding:0px">
<FONT SIZE = "<%= $title_size || 5 %>"
COLOR = "<%= $title_color %>"
><%= $INCLUDE_ARGS[0] %> </FONT>
my $cgi = new CGI;
my($query) = $cgi->keywords;
-$query =~ /^(\w+)$/ or '' =~ /^()$/;
-my $name = $1;
+my( $name, $agentnum ) = ( '', '' );
+if ( $query =~ /^(\w+)$/ ) {
+ $name = $1;
+} else {
+ $cgi->param('name') =~ /^(\w+)$/ or '' =~ /^()$/;
+ $name = $1;
+ if ( $cgi->param('agentnum') =~ /^(\d+)$/ ) {
+ $agentnum = $1;
+ }
+}
-my $info = skin_info();
+my $info = skin_info( agentnum=>$agentnum );
print $cgi->header( '-type' => 'image/png', #for now
#'-expires' => 'now',
<%=
if ( $menu_top_image ) {
- $OUT .= '<TR><TD STYLE="padding:0px"><IMG SRC="image.cgi?menu_top_image"></TD></TR>';
+ $OUT .= '<TR><TD STYLE="padding:0px"><IMG SRC="image.cgi?name=menu_top_image;agentnum='. $agentnum. '"></TD></TR>';
}
my @menu = (
if ( $menu_body_image ) {
if ( exists $item->{'url'} && $action eq $item->{'url'} ) {
$OUT .= #' BGCOLOR="'. ( $body_bgcolor || '#eeeeee' ). '" '.
- ' STYLE="background: url(image.cgi?menu_body_image) 0 bottom; '.
+ ' STYLE="background: url(image.cgi?name=menu_body_image;agentnum='. $agentnum. ') 0 bottom; '.
' color:#3366CC"; '. #XXX config
' " ';
} else {
- $OUT .= ' STYLE="background: url(image.cgi?menu_body_image) 0 bottom" ';
+ $OUT .= ' STYLE="background: url(image.cgi?name=menu_body_imagei;agentnum='. $agentnum. ') 0 bottom" ';
}
} else {
if ( exists $item->{'url'} && $action eq $item->{'url'} ) {
}
if ( $menu_bottom_image ) {
- $OUT .= '<TR><TD STYLE="padding:0px"><IMG SRC="image.cgi?menu_bottom_image"></TD></TR>';
+ $OUT .= '<TR><TD STYLE="padding:0px"><IMG SRC="image.cgi?name=menu_bottom_image;agentnum='. $agentnum. '"></TD></TR>';
} else {
$OUT .= '<TR><TD STYLE="border-right: 1px solid black" HEIGHT="100%"><BR><BR><BR><BR></TD></TR>';
}