projects
/
freeside.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
self-service interface: move from text to html invoices
[freeside.git]
/
fs_selfservice
/
FS-SelfService
/
cgi
/
cust_bill-logo.cgi
1
#!/usr/bin/perl -Tw
2
3
use strict;
4
use CGI;
5
use FS::SelfService qw( invoice_logo );
6
7
$cgi = new CGI;
8
9
my($query) = $cgi->keywords;
10
$query =~ /^([^\.\/]*)$/ or '' =~ /^()$/;
11
my $templatename = $1;
12
invoice_logo($templatename);
13
14
print $cgi->header( '-type' => $content_type,
15
'-expires' => 'now',
16
).
17
$logo;
18