From 9b2d09220e2ed150323e157f2c9febd96c690871 Mon Sep 17 00:00:00 2001 From: CentOS Buildsys Date: Jul 12 2013 11:06:48 +0000 Subject: import perl-PathTools-3.40-3.el7.src.rpm --- diff --git a/.perl-PathTools.metadata b/.perl-PathTools.metadata new file mode 100644 index 0000000..5c74281 --- /dev/null +++ b/.perl-PathTools.metadata @@ -0,0 +1 @@ +8d679ada3454f8c63ef30629465c06b2aced55b5 SOURCES/PathTools-3.40.tar.gz diff --git a/README.md b/README.md deleted file mode 100644 index 0e7897f..0000000 --- a/README.md +++ /dev/null @@ -1,5 +0,0 @@ -The master branch has no content - -Look at the c7 branch if you are working with CentOS-7, or the c4/c5/c6 branch for CentOS-4, 5 or 6 - -If you find this file in a distro specific branch, it means that no content has been checked in yet diff --git a/SOURCES/PathTools-3.40-Disable-VMS-tests.patch b/SOURCES/PathTools-3.40-Disable-VMS-tests.patch new file mode 100644 index 0000000..02a101c --- /dev/null +++ b/SOURCES/PathTools-3.40-Disable-VMS-tests.patch @@ -0,0 +1,218 @@ +From cf567d042fbe7b7ffb68457c13b182651249cf4a Mon Sep 17 00:00:00 2001 +From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= +Date: Fri, 12 Jul 2013 12:47:41 +0200 +Subject: [PATCH] Disable VMS tests +MIME-Version: 1.0 +Content-Type: text/plain; charset=UTF-8 +Content-Transfer-Encoding: 8bit + +File::Spec::VMS is not available because of bug #973713. + +Signed-off-by: Petr Písař +--- + t/Spec.t | 182 +-------------------------------------------------------------- + 1 file changed, 1 insertion(+), 181 deletions(-) + +diff --git a/t/Spec.t b/t/Spec.t +index 7dcb58e..cedd9da 100644 +--- a/t/Spec.t ++++ b/t/Spec.t +@@ -38,7 +38,7 @@ if ( $@ ) { + $INC{"VMS/Filespec.pm"} = 1 ; + } + +-foreach (qw(Unix Win32 VMS OS2 Mac Epoc Cygwin)) { ++foreach (qw(Unix Win32 OS2 Mac Epoc Cygwin)) { + require_ok("File::Spec::$_"); + } + +@@ -287,186 +287,6 @@ my @tests = ( + [ "FakeWin32->rel2abs('../','//prague_main/work')", '\\\\prague_main\\work' ], + [ "FakeWin32->rel2abs('D:foo.txt')", 'D:\\alpha\\beta\\foo.txt' ], + +-[ "VMS->case_tolerant()", '1' ], +- +-[ "VMS->catfile('a','b','c')", $vms_unix_rpt ? 'a/b/c' : '[.a.b]c' ], +-[ "VMS->catfile('a','b','[]c')", $vms_unix_rpt ? 'a/b/c' : '[.a.b]c' ], +-[ "VMS->catfile('[.a]','b','c')", $vms_unix_rpt ? 'a/b/c' : '[.a.b]c' ], +-[ "VMS->catfile('a/b/','c')", $vms_unix_rpt ? 'a/b/c' : '[.a.b]c' ], +-[ "VMS->catfile('c')", 'c' ], +-[ "VMS->catfile('[]c')", 'c' ], +- +-[ "VMS->catfile('0','b','c')", $vms_unix_rpt ? '0/b/c' : '[.0.b]c' ], +-[ "VMS->catfile('a','0','c')", $vms_unix_rpt ? 'a/0/c' : '[.a.0]c' ], +-[ "VMS->catfile('a','b','0')", $vms_unix_rpt ? 'a/b/0' : '[.a.b]0' ], +-[ "VMS->catfile('0','0','c')", $vms_unix_rpt ? '0/0/c' : '[.0.0]c' ], +-[ "VMS->catfile('a','0','0')", $vms_unix_rpt ? 'a/0/0' : '[.a.0]0' ], +-[ "VMS->catfile('0','b','0')", $vms_unix_rpt ? '0/b/0' : '[.0.b]0' ], +-[ "VMS->catfile('0','0','0')", $vms_unix_rpt ? '0/0/0' : '[.0.0]0' ], +- +- +-[ "VMS->splitpath('file')", ',,file' ], +-[ "VMS->splitpath('[d1.d2.d3]')", ',[d1.d2.d3],' ], +-[ "VMS->splitpath('[.d1.d2.d3]')", ',[.d1.d2.d3],' ], +-[ "VMS->splitpath('[d1.d2.d3]file')", ',[d1.d2.d3],file' ], +-[ "VMS->splitpath('d1/d2/d3/file')", +- $vms_unix_rpt ? ',d1/d2/d3/,file' : ',[.d1.d2.d3],file' ], +-[ "VMS->splitpath('/d1/d2/d3/file')", +- $vms_unix_rpt ? ',/d1/d2/d3/,file' : 'd1:,[d2.d3],file' ], +-[ "VMS->splitpath('[.d1.d2.d3]file')", ',[.d1.d2.d3],file' ], +-[ "VMS->splitpath('node::volume:[d1.d2.d3]')", 'node::volume:,[d1.d2.d3],' ], +-[ "VMS->splitpath('node::volume:[d1.d2.d3]file')", 'node::volume:,[d1.d2.d3],file' ], +-[ "VMS->splitpath('node\"access_spec\"::volume:[d1.d2.d3]')", 'node"access_spec"::volume:,[d1.d2.d3],' ], +-[ "VMS->splitpath('node\"access_spec\"::volume:[d1.d2.d3]file')", 'node"access_spec"::volume:,[d1.d2.d3],file' ], +- +-[ "VMS->splitpath('[]')", ',[],' ], +-[ "VMS->splitpath('[-]')", ',[-],' ], +-[ "VMS->splitpath('[]file')", ',[],file' ], +-[ "VMS->splitpath('[-]file')", ',[-],file' ], +-[ "VMS->splitpath('')", ',,' ], +-[ "VMS->splitpath('0')", ',,0' ], +-[ "VMS->splitpath('[0]')", ',[0],' ], +-[ "VMS->splitpath('[.0]')", ',[.0],' ], +-[ "VMS->splitpath('[0.0.0]')", ',[0.0.0],' ], +-[ "VMS->splitpath('[.0.0.0]')", ',[.0.0.0],' ], +-[ "VMS->splitpath('[0]0')", ',[0],0' ], +-[ "VMS->splitpath('[0.0.0]0')", ',[0.0.0],0' ], +-[ "VMS->splitpath('[.0.0.0]0')", ',[.0.0.0],0' ], +-[ "VMS->splitpath('0/0')", $vms_unix_rpt ? ',0/,0' : ',[.0],0' ], +-[ "VMS->splitpath('0/0/0')", $vms_unix_rpt ? ',0/0/,0' : ',[.0.0],0' ], +-[ "VMS->splitpath('/0/0')", $vms_unix_rpt ? ',/0/,0' : '0:,[000000],0' ], +-[ "VMS->splitpath('/0/0/0')", $vms_unix_rpt ? ',/0/0/,0' : '0:,[0],0' ], +-[ "VMS->splitpath('d1',1)", ',d1,' ], +-# $no_file tests +-[ "VMS->splitpath('[d1.d2.d3]',1)", ',[d1.d2.d3],' ], +-[ "VMS->splitpath('[.d1.d2.d3]',1)", ',[.d1.d2.d3],' ], +-[ "VMS->splitpath('d1/d2/d3',1)", $vms_unix_rpt ? ',d1/d2/d3,' : ',[.d1.d2.d3],' ], +-[ "VMS->splitpath('/d1/d2/d3',1)", $vms_unix_rpt ? ',/d1/d2/d3,' : 'd1:,[d2.d3],' ], +-[ "VMS->splitpath('node::volume:[d1.d2.d3]',1)", 'node::volume:,[d1.d2.d3],' ], +-[ "VMS->splitpath('node\"access_spec\"::volume:[d1.d2.d3]',1)", 'node"access_spec"::volume:,[d1.d2.d3],' ], +-[ "VMS->splitpath('[]',1)", ',[],' ], +-[ "VMS->splitpath('[-]',1)", ',[-],' ], +-[ "VMS->splitpath('',1)", ',,' ], +-[ "VMS->splitpath('0',1)", ',0,' ], +-[ "VMS->splitpath('[0]',1)", ',[0],' ], +-[ "VMS->splitpath('[.0]',1)", ',[.0],' ], +-[ "VMS->splitpath('[0.0.0]',1)", ',[0.0.0],' ], +-[ "VMS->splitpath('[.0.0.0]',1)", ',[.0.0.0],' ], +-[ "VMS->splitpath('0/0',1)", $vms_unix_rpt ? ',0/0,' : ',[.0.0],' ], +-[ "VMS->splitpath('0/0/0',1)", $vms_unix_rpt ? ',0/0/0,' : ',[.0.0.0],' ], +-[ "VMS->splitpath('/0/0',1)", $vms_unix_rpt ? ',/0/0,' : '0:,[000000.0],' ], +-[ "VMS->splitpath('/0/0/0',1)", $vms_unix_rpt ? ',/0/0/0,' : '0:,[0.0],' ], +- +-[ "VMS->catpath('','','file')", 'file' ], +-[ "VMS->catpath('','[d1.d2.d3]','')", '[d1.d2.d3]' ], +-[ "VMS->catpath('','[.d1.d2.d3]','')", '[.d1.d2.d3]' ], +-[ "VMS->catpath('','[d1.d2.d3]','file')", '[d1.d2.d3]file' ], +-[ "VMS->catpath('','[.d1.d2.d3]','file')", '[.d1.d2.d3]file' ], +-[ "VMS->catpath('','d1/d2/d3','file')", +- $vms_unix_rpt ? 'd1/d2/d3/file' : '[.d1.d2.d3]file' ], +-[ "VMS->catpath('v','d1/d2/d3','file')", 'v:[.d1.d2.d3]file' ], +-[ "VMS->catpath('v','','file')", 'v:file' ], +-[ "VMS->catpath('v','w:[d1.d2.d3]','file')", 'v:[d1.d2.d3]file' ], +-[ "VMS->catpath('node::volume:','[d1.d2.d3]','')", 'node::volume:[d1.d2.d3]' ], +-[ "VMS->catpath('node::volume:','[d1.d2.d3]','file')", 'node::volume:[d1.d2.d3]file' ], +-[ "VMS->catpath('node\"access_spec\"::volume:','[d1.d2.d3]','')", 'node"access_spec"::volume:[d1.d2.d3]' ], +-[ "VMS->catpath('node\"access_spec\"::volume:','[d1.d2.d3]','file')", 'node"access_spec"::volume:[d1.d2.d3]file' ], +- +-[ "VMS->canonpath('')", '' ], +-[ "VMS->canonpath('volume:[d1]file')", $vms_unix_rpt ? '/volume/d1/file' : 'volume:[d1]file' ], +-[ "VMS->canonpath('volume:[d1.-.d2.][d3.d4.-]')", $vms_unix_rpt ? '/volume/d2/d3/' : 'volume:[d2.d3]' ], +-[ "VMS->canonpath('volume:[000000.d1]d2.dir;1')", $vms_unix_rpt ? '/volume/d1/d2.dir.1' : 'volume:[d1]d2.dir;1' ], +-[ "VMS->canonpath('volume:[d1.d2.d3]file.txt')", $vms_unix_rpt ? '/volume/d1/d2/d3/file.txt' : 'volume:[d1.d2.d3]file.txt' ], +-[ "VMS->canonpath('[d1.d2.d3]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/d2/d3/file.txt' : '[d1.d2.d3]file.txt' ], +-[ "VMS->canonpath('volume:[-.d1.d2.d3]file.txt')", $vms_unix_rpt ? '/volume/../d1/d2/d3/file.txt' : 'volume:[-.d1.d2.d3]file.txt' ], +-[ "VMS->canonpath('[-.d1.d2.d3]file.txt')", $vms_unix_rpt ? '../d1/d2/d3/file.txt' : '[-.d1.d2.d3]file.txt' ], +-[ "VMS->canonpath('volume:[--.d1.d2.d3]file.txt')", $vms_unix_rpt ? '/volume/../../d1/d2/d3/file.txt' : 'volume:[--.d1.d2.d3]file.txt' ], +-[ "VMS->canonpath('[--.d1.d2.d3]file.txt')", $vms_unix_rpt ? '../../d1/d2/d3/file.txt' : '[--.d1.d2.d3]file.txt' ], +-[ "VMS->canonpath('volume:[d1.-.d2.d3]file.txt')", $vms_unix_rpt ? '/volume/d2/d3/file.txt' : 'volume:[d2.d3]file.txt' ], +-[ "VMS->canonpath('[d1.-.d2.d3]file.txt')", $vms_unix_rpt ? '/sys$disk/d2/d3/file.txt' : '[d2.d3]file.txt' ], +-[ "VMS->canonpath('volume:[d1.--.d2.d3]file.txt')", $vms_unix_rpt ? '/volume/../d2/d3/file.txt' : 'volume:[-.d2.d3]file.txt' ], +-[ "VMS->canonpath('[d1.--.d2.d3]file.txt')", $vms_unix_rpt ? '../d2/d3/file.txt' : '[-.d2.d3]file.txt' ], +-[ "VMS->canonpath('volume:[d1.d2.-.d3]file.txt')", $vms_unix_rpt ? '/volume/d1/d3/file.txt' : 'volume:[d1.d3]file.txt' ], +-[ "VMS->canonpath('[d1.d2.-.d3]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/d3/file.txt' : '[d1.d3]file.txt' ], +-[ "VMS->canonpath('volume:[d1.d2.--.d3]file.txt')", $vms_unix_rpt ? '/volume/d3/file.txt' : 'volume:[d3]file.txt' ], +-[ "VMS->canonpath('[d1.d2.--.d3]file.txt')", $vms_unix_rpt ? '/sys$disk/d3/file.txt' : '[d3]file.txt' ], +-[ "VMS->canonpath('volume:[d1.d2.d3.-]file.txt')", $vms_unix_rpt ? '/volume/d1/d2/file.txt' : 'volume:[d1.d2]file.txt' ], +-[ "VMS->canonpath('[d1.d2.d3.-]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/d2/file.txt' : '[d1.d2]file.txt' ], +-[ "VMS->canonpath('volume:[d1.d2.d3.--]file.txt')", $vms_unix_rpt ? '/volume/d1/file.txt' : 'volume:[d1]file.txt' ], +-[ "VMS->canonpath('[d1.d2.d3.--]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/file.txt' : '[d1]file.txt' ], +-[ "VMS->canonpath('volume:[d1.000000.][000000.][d3.--]file.txt')", $vms_unix_rpt ? '/volume/d1/file.txt' +- : 'volume:[d1]file.txt' ], +-[ "VMS->canonpath('[d1.000000.][000000.][d3.--]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/file.txt' +- : '[d1]file.txt' ], +-[ "VMS->canonpath('volume:[d1.000000.][000000.][d2.000000]file.txt')", $vms_unix_rpt ? '/volume/d1/000000/d2/000000/file.txt' +- : 'volume:[d1.000000.d2.000000]file.txt' ], +-[ "VMS->canonpath('[d1.000000.][000000.][d2.000000]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/000000/d2/000000/file.txt' +- : '[d1.000000.d2.000000]file.txt' ], +-[ "VMS->canonpath('volume:[d1.000000.][000000.][d3.--.000000]file.txt')", $vms_unix_rpt ? '/volume/d1/000000/file.txt' +- : 'volume:[d1.000000]file.txt' ], +-[ "VMS->canonpath('[d1.000000.][000000.][d3.--.000000]file.txt')", $vms_unix_rpt ? '/sys$disk/d1/000000/file.txt' +- : '[d1.000000]file.txt' ], +-[ "VMS->canonpath('volume:[d1.000000.][000000.][-.-.000000]file.txt')", $vms_unix_rpt ? '/volume/file.txt' +- : 'volume:[000000]file.txt' ], +-[ "VMS->canonpath('[d1.000000.][000000.][--.-.000000]file.txt')", $vms_unix_rpt ? '../file.txt' : '[-.000000]file.txt' ], +-[ "VMS->canonpath('[d1.d2.--]file')", $vms_unix_rpt ? '../file.txt' : '[000000]file' ], +-# During the Perl 5.8 era, FS::Unix stopped eliminating redundant path elements, so mimic that here. +-[ "VMS->canonpath('a/../../b/c.dat')", $vms_unix_rpt ? 'a/../../b/c.dat' : '[-.b]c.dat' ], +-[ "VMS->canonpath('^')", '^' ], +- +-[ "VMS->splitdir('')", '' ], +-[ "VMS->splitdir('[]')", '' ], +-[ "VMS->splitdir('d1.d2.d3')", 'd1,d2,d3' ], +-[ "VMS->splitdir('[d1.d2.d3]')", 'd1,d2,d3' ], +-[ "VMS->splitdir('.d1.d2.d3')", 'd1,d2,d3' ], +-[ "VMS->splitdir('[.d1.d2.d3]')", 'd1,d2,d3' ], +-[ "VMS->splitdir('.-.d2.d3')", '-,d2,d3' ], +-[ "VMS->splitdir('[.-.d2.d3]')", '-,d2,d3' ], +-[ "VMS->splitdir('[d1.d2]')", 'd1,d2' ], +-[ "VMS->splitdir('[d1-.--d2]')", 'd1-,--d2' ], +-[ "VMS->splitdir('[d1---.-.d2]')", 'd1---,-,d2' ], +-[ "VMS->splitdir('[d1.---.d2]')", 'd1,-,-,-,d2' ], +-[ "VMS->splitdir('[d1---d2]')", 'd1---d2' ], +-[ "VMS->splitdir('[d1.][000000.d2]')", 'd1,d2' ], +-[ "VMS->splitdir('[.d1.d2^.d3]')", 'd1,d2^.d3' ], +- +-[ "VMS->catdir('')", '' ], +-[ "VMS->catdir('foo')", $vms_unix_rpt ? 'foo' : '[.foo]' ], +-[ "VMS->catdir('d1','d2','d3')", $vms_unix_rpt ? 'd1/d2/d3' : '[.d1.d2.d3]' ], +-[ "VMS->catdir('d1','d2/','d3')", $vms_unix_rpt ? 'd1/d2/d3' : '[.d1.d2.d3]' ], +-[ "VMS->catdir('','d1','d2','d3')",$vms_unix_rpt ? '/d1/d2/d3' : '[.d1.d2.d3]' ], +-[ "VMS->catdir('','-','d2','d3')", $vms_unix_rpt ? '-/d2/d3' : '[-.d2.d3]' ], +-[ "VMS->catdir('','-','','d3')", $vms_unix_rpt ? '-/d3' : '[-.d3]' ], +-[ "VMS->catdir('dir.dir','d2.dir','d3.dir')", $vms_unix_rpt ? 'dir/d2/d3' +- : '[.dir.d2.d3]' ], +-[ "VMS->catdir('[.name]')", $vms_unix_rpt ? 'name/' : '[.name]' ], +-[ "VMS->catdir('[.name]','[.name]')", $vms_unix_rpt ? 'name/name' :'[.name.name]' ], +-[ "VMS->catdir('/a/b/c','[-]')", $vms_unix_rpt ? '/a/b/c/..' : 'a:[b]'], +-[ "VMS->catdir('a:[b.c]','..')", $vms_unix_rpt ? '/a/b/c/..' : 'a:[b]'], +- +-[ "VMS->abs2rel('node::volume:[t1.t2.t3]','node::volume:[t1.t2.t3]')", $vms_unix_rpt ? './' : '[]' ], +-[ "VMS->abs2rel('node::volume:[t1.t2.t3]','[t1.t2.t3]')", $vms_unix_rpt ? '/node//volume/t1/t2/t3/' : 'node::volume:[t1.t2.t3]' ], +-[ "VMS->abs2rel('node::volume:[t1.t2.t4]','node::volume:[t1.t2.t3]')", $vms_unix_rpt ? '../t4/' : '[-.t4]' ], +-[ "VMS->abs2rel('node::volume:[t1.t2.t4]','[t1.t2.t3]')", $vms_unix_rpt ? '/node//volume/t1/t2/t4/' : 'node::volume:[t1.t2.t4]' ], +-[ "VMS->abs2rel('[t1.t2.t3]','[t1.t2.t3]')", $vms_unix_rpt ? './' : '[]' ], +-[ "VMS->abs2rel('[t1.t2.t3]file','[t1.t2.t3]')", 'file' ], +-[ "VMS->abs2rel('[t1.t2.t3]file','[t1.t2]')", $vms_unix_rpt ? 't3/file' : '[.t3]file' ], +-[ "VMS->abs2rel('v:[t1.t2.t3]file','v:[t1.t2]')", $vms_unix_rpt ? 't3/file' : '[.t3]file' ], +-[ "VMS->abs2rel('[t1.t2.t4]','[t1.t2.t3]')", $vms_unix_rpt ? '../t4/' : '[-.t4]' ], +-[ "VMS->abs2rel('[t1.t2]file','[t1.t2.t3]')", $vms_unix_rpt ? '../file' : '[-]file' ], +-[ "VMS->abs2rel('[t1.t2.t3.t4]','[t1.t2.t3]')", $vms_unix_rpt ? 't4/' : '[.t4]' ], +-[ "VMS->abs2rel('[t4.t5.t6]','[t1.t2.t3]')", $vms_unix_rpt ? '../../../t4/t5/t6/' : '[---.t4.t5.t6]' ], +-[ "VMS->abs2rel('[000000]','[t1.t2.t3]')", $vms_unix_rpt ? '../../../' : '[---]' ], +-[ "VMS->abs2rel('a:[t1.t2.t4]','a:[t1.t2.t3]')", $vms_unix_rpt ? '../t4/' : '[-.t4]' ], +-[ "VMS->abs2rel('a:[t1.t2.t4]','[t1.t2.t3]')", $vms_unix_rpt ? '/a/t1/t2/t4/' : 'a:[t1.t2.t4]' ], +-[ "VMS->abs2rel('[a.-.b.c.-]','[t1.t2.t3]')", $vms_unix_rpt ? '../../../b/' : '[---.b]' ], +- +-[ "VMS->rel2abs('[.t4]','[t1.t2.t3]')", $vms_unix_rpt ? '/sys$disk/t1/t2/t3/t4/' : '[t1.t2.t3.t4]' ], +-[ "VMS->rel2abs('[.t4.t5]','[t1.t2.t3]')", $vms_unix_rpt ? '/sys$disk/t1/t2/t3/t4/t5/' : '[t1.t2.t3.t4.t5]' ], +-[ "VMS->rel2abs('[]','[t1.t2.t3]')", $vms_unix_rpt ? '/sys$disk/t1/t2/t3/' : '[t1.t2.t3]' ], +-[ "VMS->rel2abs('[-]','[t1.t2.t3]')", $vms_unix_rpt ? '/sys$disk/t1/t2/' : '[t1.t2]' ], +-[ "VMS->rel2abs('[-.t4]','[t1.t2.t3]')", $vms_unix_rpt ? '/sys$disk/t1/t2/t4/' : '[t1.t2.t4]' ], +-[ "VMS->rel2abs('[t1]','[t1.t2.t3]')", $vms_unix_rpt ? '/sys$disk/t1/' : '[t1]' ], + + [ "OS2->case_tolerant()", '1' ], + +-- +1.8.1.4 + diff --git a/SPECS/perl-PathTools.spec b/SPECS/perl-PathTools.spec new file mode 100644 index 0000000..8a8cae9 --- /dev/null +++ b/SPECS/perl-PathTools.spec @@ -0,0 +1,104 @@ +%global cpan_version 3.40 +Name: perl-PathTools +Version: %(echo '%{cpan_version}' | tr _ .) +Release: 3%{?dist} +Summary: PathTools Perl module (Cwd, File::Spec) +License: (GPL+ or Artistic) and BSD +Group: Development/Libraries +URL: http://search.cpan.org/dist/PathTools/ +Source0: http://www.cpan.org/authors/id/S/SM/SMUELLER/PathTools-%{cpan_version}.tar.gz +# Disable VMS test (bug #973713) +Patch0: PathTools-3.40-Disable-VMS-tests.patch +BuildRequires: perl +BuildRequires: perl(ExtUtils::MakeMaker) +# Run-time: +BuildRequires: perl(Carp) +BuildRequires: perl(Exporter) +# File::Basename not needed because of removed File::Spec::VMS +BuildRequires: perl(Scalar::Util) +BuildRequires: perl(strict) +BuildRequires: perl(vars) +# Tests: +BuildRequires: perl(Carp::Heavy) +BuildRequires: perl(Config) +BuildRequires: perl(File::Path) +BuildRequires: perl(lib) +BuildRequires: perl(Test::More) +Requires: perl(:MODULE_COMPAT_%(eval "`perl -V:version`"; echo $version)) +Requires: perl(Carp) +Requires: perl(Scalar::Util) + +%{?perl_default_filter} + +%description +This is the combined distribution for the File::Spec and Cwd modules. + +%prep +%setup -q -n PathTools-%{cpan_version} +%patch0 -p1 +# Remove bundled modules +rm -r t/lib +sed -i -e '/^t\/lib\//d' MANIFEST +# Do not distribute File::Spec::VMS as it works on VMS only (bug #973713) +rm lib/File/Spec/VMS.pm +sed -i -e '/^lib\/File\/Spec\/VMS.pm/d' MANIFEST + +%build +perl Makefile.PL INSTALLDIRS=vendor OPTIMIZE="$RPM_OPT_FLAGS" +make %{?_smp_mflags} + +%install +make pure_install DESTDIR=$RPM_BUILD_ROOT +find $RPM_BUILD_ROOT -type f -name .packlist -exec rm -f {} \; +find $RPM_BUILD_ROOT -type f -name '*.bs' -size 0 -exec rm -f {} \; +%{_fixperms} $RPM_BUILD_ROOT/* + +%check +make test + +%files +%doc Changes README +%{perl_vendorarch}/auto/* +%{perl_vendorarch}/Cwd.pm +%{perl_vendorarch}/File/ +%{_mandir}/man3/* + +%changelog +* Fri Jul 12 2013 Petr Pisar - 3.40-3 +- Disable VMS test (bug #973713) + +* Fri Jun 14 2013 Petr Pisar - 3.40-2 +- Do not distribute File::Spec::VMS (bug #973713) + +* Mon Feb 04 2013 Petr Pisar - 3.40-1 +- 3.40 bump + +* Tue Sep 18 2012 Petr Pisar - 3.39.01-1 +- 3.39_01 bump + +* Wed Aug 15 2012 Petr Pisar - 3.33-8 +- Specify all dependencies + +* Wed Aug 15 2012 Daniel Mach - 3.33-7.1 +- Rebuild for perl 5.16 + +* Fri Jul 20 2012 Fedora Release Engineering - 3.33-7 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_18_Mass_Rebuild + +* Wed Jun 06 2012 Petr Pisar - 3.33-6 +- Perl 5.16 rebuild + +* Fri Jan 13 2012 Fedora Release Engineering - 3.33-5 +- Rebuilt for https://fedoraproject.org/wiki/Fedora_17_Mass_Rebuild + +* Mon Jul 25 2011 Petr Pisar - 3.33-4 +- RPM 4.9 dependency filtering added + +* Mon Jun 20 2011 Marcela Mašláňová - 3.33-3 +- Perl mass rebuild + +* Sun May 29 2011 Ville Skyttä - 3.33-2 +- Own the %%{perl_vendorarch}/File dir. + +* Mon Feb 28 2011 Marcela Mašláňová 3.33-1 +- Specfile autogenerated by cpanspec 1.79.