From: Richard D. <ric...@us...> - 2007-05-06 09:56:42
|
Update of /cvsroot/file-extattr/File-ExtAttr/t In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv27849/t Modified Files: 11basic.t 13long.t 14optional.t 15create.t 16replace.t 17createreplace.t 18list.t 20tie-basic.t 22tie-nonuser.t 30nsbasic.t 31nsmultiple.t 32nsnonuser.t 33nslong.t 39nsempty.t Log Message: Really fix build on NetBSD 3.1; update test suite to skip tests on NetBSD < 4.0 Index: 14optional.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/14optional.t,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** 14optional.t 27 Apr 2007 06:01:57 -0000 1.4 --- 14optional.t 6 May 2007 09:56:40 -0000 1.5 *************** *** 9,13 **** use strict; ! use Test::More tests => 4; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 4; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 33nslong.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/33nslong.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 33nslong.t 27 Apr 2007 06:01:57 -0000 1.2 --- 33nslong.t 6 May 2007 09:56:40 -0000 1.3 *************** *** 12,16 **** use strict; ! use Test::More tests => 16; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 12,30 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 16; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 15create.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/15create.t,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** 15create.t 27 Apr 2007 06:01:57 -0000 1.3 --- 15create.t 6 May 2007 09:56:40 -0000 1.4 *************** *** 9,13 **** use strict; ! use Test::More tests => 10; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 10; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 31nsmultiple.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/31nsmultiple.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 31nsmultiple.t 27 Apr 2007 06:01:57 -0000 1.2 --- 31nsmultiple.t 6 May 2007 09:56:40 -0000 1.3 *************** *** 9,13 **** use strict; ! use Test::More tests => 26; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr listfattrns); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 26; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr listfattrns); Index: 30nsbasic.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/30nsbasic.t,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** 30nsbasic.t 27 Apr 2007 06:01:57 -0000 1.4 --- 30nsbasic.t 6 May 2007 09:56:40 -0000 1.5 *************** *** 9,13 **** use strict; ! use Test::More tests => 12; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr listfattrns); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 12; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr listfattrns); Index: 13long.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/13long.t,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** 13long.t 27 Apr 2007 06:01:57 -0000 1.5 --- 13long.t 6 May 2007 09:56:40 -0000 1.6 *************** *** 12,16 **** use strict; ! use Test::More tests => 16; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 12,30 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 16; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 20tie-basic.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/20tie-basic.t,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** 20tie-basic.t 27 Apr 2007 06:01:57 -0000 1.7 --- 20tie-basic.t 6 May 2007 09:56:40 -0000 1.8 *************** *** 2,6 **** use strict; ! use Test::More tests => 12; use File::Temp qw(tempfile); use File::ExtAttr::Tie; --- 2,20 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 12; ! } ! use File::Temp qw(tempfile); use File::ExtAttr::Tie; Index: 39nsempty.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/39nsempty.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 39nsempty.t 27 Apr 2007 06:01:57 -0000 1.2 --- 39nsempty.t 6 May 2007 09:56:40 -0000 1.3 *************** *** 9,13 **** use strict; ! use Test::More tests => 8; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 8; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 22tie-nonuser.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/22tie-nonuser.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 22tie-nonuser.t 27 Apr 2007 06:01:57 -0000 1.2 --- 22tie-nonuser.t 6 May 2007 09:56:40 -0000 1.3 *************** *** 2,6 **** use strict; ! use Test::More tests => 20; use File::Temp qw(tempfile); use File::ExtAttr::Tie; --- 2,20 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 20; ! } ! use File::Temp qw(tempfile); use File::ExtAttr::Tie; Index: 11basic.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/11basic.t,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** 11basic.t 27 Apr 2007 06:01:57 -0000 1.5 --- 11basic.t 6 May 2007 09:56:40 -0000 1.6 *************** *** 9,13 **** use strict; ! use Test::More tests => 8; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 8; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 16replace.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/16replace.t,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** 16replace.t 27 Apr 2007 06:01:57 -0000 1.3 --- 16replace.t 6 May 2007 09:56:40 -0000 1.4 *************** *** 9,13 **** use strict; ! use Test::More tests => 10; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 10; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 17createreplace.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/17createreplace.t,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** 17createreplace.t 27 Apr 2007 06:01:57 -0000 1.3 --- 17createreplace.t 6 May 2007 09:56:40 -0000 1.4 *************** *** 9,13 **** use strict; ! use Test::More tests => 4; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 9,27 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 4; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 32nsnonuser.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/32nsnonuser.t,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** 32nsnonuser.t 27 Apr 2007 06:01:57 -0000 1.4 --- 32nsnonuser.t 6 May 2007 09:56:40 -0000 1.5 *************** *** 6,10 **** use strict; ! use Test::More tests => 4; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); --- 6,24 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 4; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr); Index: 18list.t =================================================================== RCS file: /cvsroot/file-extattr/File-ExtAttr/t/18list.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 18list.t 27 Apr 2007 06:01:57 -0000 1.2 --- 18list.t 6 May 2007 09:56:40 -0000 1.3 *************** *** 2,6 **** use strict; ! use Test::More tests => 122; use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr listfattr); --- 2,20 ---- use strict; ! use Test::More; ! ! BEGIN { ! my $tlib = $0; ! $tlib =~ s|/[^/]*$|/lib|; ! push(@INC, $tlib); ! } ! use t::Support; ! ! if (t::Support::should_skip()) { ! plan skip_all => 'Tests unsupported on this OS/filesystem'; ! } else { ! plan tests => 122; ! } ! use File::Temp qw(tempfile); use File::ExtAttr qw(setfattr getfattr delfattr listfattr); |