projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of git.freeside.biz:/home/git/freeside
[freeside.git]
/
fs_selfservice
/
FS-SelfService
/
cgi
/
image.cgi
diff --git
a/fs_selfservice/FS-SelfService/cgi/image.cgi
b/fs_selfservice/FS-SelfService/cgi/image.cgi
index
e951dcd
..
ee17683
100755
(executable)
--- 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;
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',
print $cgi->header( '-type' => 'image/png', #for now
#'-expires' => 'now',