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

Annotation of /rpms/perl-Object-Persistence/sme7/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)
Tue Jun 12 17:02:25 2007 UTC (17 years, 5 months ago) by slords
Branch: MAIN
CVS Tags: perl-Object-Persistence-0_92-4_el4_sme, HEAD
Import on branch sme7 of package perl-Object-Persistence-0.92-4.el4.sme.src.rpm

1 slords 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