summaryrefslogtreecommitdiff
path: root/fs_selfservice/FS-SelfService/cgi/image.cgi
diff options
context:
space:
mode:
authorIvan Kohler <ivan@freeside.biz>2013-09-06 01:51:13 -0700
committerIvan Kohler <ivan@freeside.biz>2013-09-06 01:51:13 -0700
commitd67217095193ef9b977b907a256a90befd7be493 (patch)
treedf2b5b1556ab5a2993480d685194b4fa1a08c0c5 /fs_selfservice/FS-SelfService/cgi/image.cgi
parent154d2a6b30e1001b02232e099b0ffd4bae6f970c (diff)
fix agent-virtualization of logos and other images in self-service, RT#23218
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/image.cgi')
-rwxr-xr-xfs_selfservice/FS-SelfService/cgi/image.cgi14
1 files changed, 11 insertions, 3 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/image.cgi b/fs_selfservice/FS-SelfService/cgi/image.cgi
index e951dcd1a..ee17683a6 100755
--- a/fs_selfservice/FS-SelfService/cgi/image.cgi
+++ b/fs_selfservice/FS-SelfService/cgi/image.cgi
@@ -8,10 +8,18 @@ use FS::SelfService qw( skin_info );
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',