From 16f5b89319d2f2b409b307dcdc2aaa901e2be7fd Mon Sep 17 00:00:00 2001 From: mark Date: Sun, 31 Jul 2011 08:11:44 +0000 Subject: clean attachment filenames, #13843 --- httemplate/edit/cust_main_attach.cgi | 20 +++++++++++--------- 1 file changed, 11 insertions(+), 9 deletions(-) (limited to 'httemplate/edit/cust_main_attach.cgi') diff --git a/httemplate/edit/cust_main_attach.cgi b/httemplate/edit/cust_main_attach.cgi index 4d9688fe9..0880c760a 100755 --- a/httemplate/edit/cust_main_attach.cgi +++ b/httemplate/edit/cust_main_attach.cgi @@ -6,19 +6,22 @@ -

- - % if(defined $attach) { % if($curuser->access_right("Download attachment")) { Download this file
% } +% } + +
+
+ +% if ( defined $attach ) { - + - + - + % } % else { # !defined $attach @@ -47,9 +50,8 @@ my $curuser = $FS::CurrentUser::CurrentUser; my $attachnum = ''; my $attach; -if ( $cgi->param('error') ) { - #$comment = $cgi->param('comment'); -} elsif ( $cgi->param('attachnum') =~ /^(\d+)$/ ) { + +if ( $cgi->param('attachnum') =~ /^(\d+)$/ ) { $attachnum = $1; die "illegal query ". $cgi->keywords unless $attachnum; $attach = qsearchs('cust_attachment', { 'attachnum' => $attachnum }); -- cgit v1.2.1
Filename >
>
Description
MIME type
Size <% $attach->size %>