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

Contents 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 - (show 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 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