/[smecontribs]/rpms/smeserver-wbl/contribs9/smeserver-wbl-0.3.0.bz10287-allowSpacesInRBL.patch
ViewVC logotype

Annotation of /rpms/smeserver-wbl/contribs9/smeserver-wbl-0.3.0.bz10287-allowSpacesInRBL.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (hide annotations) (download)
Thu May 11 03:09:15 2017 UTC (7 years, 5 months ago) by unnilennium
Branch: MAIN
CVS Tags: smeserver-wbl-0_3_0-18_el6_sme, smeserver-wbl-0_3_0-19_el6_sme, smeserver-wbl-0_3_0-17_el6_sme, HEAD
* Wed May 10 2017 Jean-Philipe Pialasse <tests@pialasse.com> 0.3.0-17.sme
-  allow embedded spaces when entering new DNSBL zones [SME: 10287]

1 unnilennium 1.1 diff -Nur smeserver-wbl-0.3.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm smeserver-wbl-0.3.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm
2     --- smeserver-wbl-0.3.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm 2017-05-10 22:53:55.115000000 -0400
3     +++ smeserver-wbl-0.3.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm 2017-05-10 23:02:47.748000000 -0400
4     @@ -376,7 +376,7 @@
5    
6    
7     my $sbllistcgi = $q->param('sbllist');
8     - my @sbllistcgi = split /\s+/, $sbllistcgi;
9     + my @sbllistcgi = split /\s{2,}/, $sbllistcgi;
10     my $sbllistdb = '';
11     foreach (@sbllistcgi) { $sbllistdb = $sbllistdb . ',' . $_; }
12     $sbllistdb =~ s/^,//;
13     @@ -385,7 +385,7 @@
14    
15    
16     my $rbllistcgi = $q->param('rbllist');
17     - my @rbllistcgi = split /\s+/, $rbllistcgi;
18     + my @rbllistcgi = split /\s{2,}/, $rbllistcgi;
19     my $rbllistdb = '';
20     foreach (@rbllistcgi) { $rbllistdb = $rbllistdb . ',' . $_; }
21     $rbllistdb =~ s/^,//;

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed