/[smeserver]/rpms/perl-Object-Persistence/sme10/Object-Persistence-0.92.patch.2002052300
ViewVC logotype

Annotation of /rpms/perl-Object-Persistence/sme10/Object-Persistence-0.92.patch.2002052300

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


Revision 1.1 - (hide annotations) (download)
Thu Feb 4 13:09:32 2016 UTC (8 years, 8 months ago) by vip-ire
Branch: MAIN
CVS Tags: perl-Object-Persistence-0_92-7_el7_sme, perl-Object-Persistence-0_92-5_el7_sme, perl-Object-Persistence-0_92-6_el7_sme, HEAD
sme10 branch

1 vip-ire 1.1 diff -ur Object-Persistence-0.92-1/lib/Persistence/Object/Simple.pm Object-Persistence-0.92-2/lib/Persistence/Object/Simple.pm
2     --- Object-Persistence-0.92-1/lib/Persistence/Object/Simple.pm Wed Jan 30 02:47:14 2002
3     +++ Object-Persistence-0.92-2/lib/Persistence/Object/Simple.pm Thu May 23 14:03:48 2002
4     @@ -146,7 +146,7 @@
5     close C;
6    
7     # untaint the input meaningfully
8     - if ($objectfile =~ /^(\$VAR1 = bless[^;]+;)$/s) {
9     + if ($objectfile =~ /^(\$VAR1 = bless.+)$/s) {
10     my $object = eval "$1";
11     croak "$args{ __Fn } is corrupt. Object loading aborted." if $@;
12    

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