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

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

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 --- Object-Persistence-0.92/lib/Persistence/Object/Simple.pm.orig Mon Sep 27 11:57:12 2004
2     +++ Object-Persistence-0.92/lib/Persistence/Object/Simple.pm Mon Sep 27 11:57:23 2004
3     @@ -111,7 +111,7 @@
4     # guard against disallowed characters in filename (basically those
5     # which might mess up the open() call)
6     if (($fn) = ($fn =~ /^([^<>|+]+)$/)) {
7     - open C, ">$fn" || croak "Can't open $fn for writing.";
8     + open C, ">$fn" or croak "Can't open $fn for writing.";
9     eval { flock C, 2 }; undef $@;
10     $fh = *C{ IO };
11     } else {

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