/[smeserver]/rpms/e-smith-lib/sme8/e-smith-lib-1.18.0-templates.metadata.patch2
ViewVC logotype

Contents of /rpms/e-smith-lib/sme8/e-smith-lib-1.18.0-templates.metadata.patch2

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


Revision 1.1 - (show annotations) (download)
Tue Jun 12 19:03:20 2007 UTC (17 years, 4 months ago) by slords
Branch: MAIN
CVS Tags: e-smith-lib-1_18_0-20_el5_sme, e-smith-lib-1_18_0-24_el5_sme, e-smith-lib-1_18_0-23_el5_sme, e-smith-lib-1_18_0-26_el5_sme, e-smith-lib-1_18_0-25_el5_sme, e-smith-lib-1_18_0-27_el5_sme, e-smith-lib-1_18_0-18_el5_sme, e-smith-lib-1_18_0-16_el5_sme, e-smith-lib-1_18_0-17_el5_sme, e-smith-lib-1_18_0-22_el5_sme, e-smith-lib-1_18_0-21_el5_sme, e-smith-lib-1_18_0-28_el5_sme, e-smith-lib-1_18_0-19_el5_sme
Branch point for: e-smith-lib-1_18_0-tree
Import on branch sme8 of package e-smith-lib-1.18.0-16.el5.sme.src.rpm

1 diff -Nur -x '*.orig' -x '*.rej' e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/templates.pm mezzanine_patched_e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/templates.pm
2 --- e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/templates.pm 2007-03-19 11:24:00.000000000 -0400
3 +++ mezzanine_patched_e-smith-lib-1.18.0/root/usr/lib/perl5/site_perl/esmith/templates.pm 2007-03-19 11:23:44.000000000 -0400
4 @@ -363,8 +363,10 @@
5 {
6 while ($_ = $d->read)
7 {
8 - /(\w+)/ or next; # skip . and ..
9 - my $file = $1;
10 + # skip any directories, including . and ..
11 + next if -d "$metadata_path/$_";
12 + # Untaint filename
13 + /(\w+)/; my $file = $1;
14 unless (open(FILE, "$metadata_path/$file"))
15 {
16 warn("Could not open metadata file $metadata_path/$file: $!");

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