Sync from SUSE:SLFO:Main perl-Test-Exception revision 5d4311b54f8e02fd5828404f9939ca19
This commit is contained in:
commit
d50cad6a37
23
.gitattributes
vendored
Normal file
23
.gitattributes
vendored
Normal file
@ -0,0 +1,23 @@
|
||||
## Default LFS
|
||||
*.7z filter=lfs diff=lfs merge=lfs -text
|
||||
*.bsp filter=lfs diff=lfs merge=lfs -text
|
||||
*.bz2 filter=lfs diff=lfs merge=lfs -text
|
||||
*.gem filter=lfs diff=lfs merge=lfs -text
|
||||
*.gz filter=lfs diff=lfs merge=lfs -text
|
||||
*.jar filter=lfs diff=lfs merge=lfs -text
|
||||
*.lz filter=lfs diff=lfs merge=lfs -text
|
||||
*.lzma filter=lfs diff=lfs merge=lfs -text
|
||||
*.obscpio filter=lfs diff=lfs merge=lfs -text
|
||||
*.oxt filter=lfs diff=lfs merge=lfs -text
|
||||
*.pdf filter=lfs diff=lfs merge=lfs -text
|
||||
*.png filter=lfs diff=lfs merge=lfs -text
|
||||
*.rpm filter=lfs diff=lfs merge=lfs -text
|
||||
*.tbz filter=lfs diff=lfs merge=lfs -text
|
||||
*.tbz2 filter=lfs diff=lfs merge=lfs -text
|
||||
*.tgz filter=lfs diff=lfs merge=lfs -text
|
||||
*.ttf filter=lfs diff=lfs merge=lfs -text
|
||||
*.txz filter=lfs diff=lfs merge=lfs -text
|
||||
*.whl filter=lfs diff=lfs merge=lfs -text
|
||||
*.xz filter=lfs diff=lfs merge=lfs -text
|
||||
*.zip filter=lfs diff=lfs merge=lfs -text
|
||||
*.zst filter=lfs diff=lfs merge=lfs -text
|
||||
BIN
Test-Exception-0.43.tar.gz
(Stored with Git LFS)
Normal file
BIN
Test-Exception-0.43.tar.gz
(Stored with Git LFS)
Normal file
Binary file not shown.
23
cpanspec.yml
Normal file
23
cpanspec.yml
Normal file
@ -0,0 +1,23 @@
|
||||
---
|
||||
#description_paragraphs: 3
|
||||
#no_testing: broken upstream
|
||||
#sources:
|
||||
# - source1
|
||||
# - source2
|
||||
#patches:
|
||||
# foo.patch: -p1
|
||||
# bar.patch:
|
||||
#preamble: |-
|
||||
# BuildRequires: gcc-c++
|
||||
#post_prep: |-
|
||||
# hunspell=`pkg-config --libs hunspell | sed -e 's,-l,,; s, *,,g'`
|
||||
# sed -i -e "s,hunspell-X,$hunspell," t/00-prereq.t Makefile.PL
|
||||
#post_install: |-
|
||||
# sed on %{name}.files
|
||||
#license: SUSE-NonFree
|
||||
#skip_noarch: 1
|
||||
#custom_build: |-
|
||||
#./Build build flags=%{?_smp_mflags} --myflag
|
||||
#custom_test: |-
|
||||
#startserver && make test
|
||||
#ignore_requires: Bizarre::Module
|
||||
154
perl-Test-Exception.changes
Normal file
154
perl-Test-Exception.changes
Normal file
@ -0,0 +1,154 @@
|
||||
-------------------------------------------------------------------
|
||||
Sat Jan 2 10:16:17 UTC 2016 - coolo@suse.com
|
||||
|
||||
- updated to 0.43
|
||||
see /usr/share/doc/packages/perl-Test-Exception/Changes
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Sat Dec 26 10:16:52 UTC 2015 - coolo@suse.com
|
||||
|
||||
- updated to 0.41
|
||||
see /usr/share/doc/packages/perl-Test-Exception/Changes
|
||||
|
||||
0.40 [2015-12-21]
|
||||
- Updated for Test2
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Sun Jun 7 09:05:54 UTC 2015 - coolo@suse.com
|
||||
|
||||
- updated to 0.40
|
||||
see /usr/share/doc/packages/perl-Test-Exception/Changes
|
||||
|
||||
0.40 [2015-06-05]
|
||||
- Updated for changes in Test::Stream (Use Test::Stream::Sync)
|
||||
|
||||
0.39 [2015-06-04]
|
||||
- Updated for changes in Test::Stream
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Apr 23 05:55:21 UTC 2015 - coolo@suse.com
|
||||
|
||||
- extend version to 6 digits to avoid problems with > 0.331
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Mon Apr 13 18:27:40 UTC 2015 - coolo@suse.com
|
||||
|
||||
- updated to 0.38
|
||||
see /usr/share/doc/packages/perl-Test-Exception/Changes
|
||||
|
||||
0.38 [2015-02-27]
|
||||
- fixed repository link in metadata
|
||||
|
||||
0.37 [2015-02-27]
|
||||
- distribution is now managed by ExtUtils::MakeMaker (RT#102054)
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Feb 6 13:13:00 UTC 2015 - coolo@suse.com
|
||||
|
||||
- updated to 0.36
|
||||
- Fix bug when Test::More has been downgraded
|
||||
|
||||
0.35 [2014-09-20]
|
||||
- Fix a bug when Test::Builder isn't new (better version).
|
||||
|
||||
0.34 [2014-09-20]
|
||||
- Fix a bug when Test::Builder isn't new.
|
||||
|
||||
0.33 [2014-09-19] Or "Another Test-Simple change"
|
||||
- Fixed test broken by changes in Test::Builder and friends
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Jun 4 15:03:12 UTC 2013 - coolo@suse.com
|
||||
|
||||
- updated to 0.32
|
||||
Fixed tests that broke due to Test::More diagnostic changes
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Mon Apr 15 10:37:49 UTC 2013 - idonmez@suse.com
|
||||
|
||||
- Add Source URL, see https://en.opensuse.org/SourceUrls
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Nov 18 11:07:00 UTC 2011 - coolo@suse.com
|
||||
|
||||
- use original .tar.gz
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Aug 30 19:13:52 UTC 2011 - andrea.turrini@gmail.com
|
||||
|
||||
- standardized "Authors:" format in description of
|
||||
perl-Test-Exception.spec
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Wed Dec 1 06:55:42 UTC 2010 - coolo@novell.com
|
||||
|
||||
- switch to perl_requires macro
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Oct 15 15:53:15 CEST 2010 - anicka@suse.cz
|
||||
|
||||
- update to 0.31
|
||||
- Added a bunch of folk to the acknowledgements
|
||||
- Added some clarifying documentation to respond to RT#59293
|
||||
- Marked a test that was failing under T::B 2.0 until we figure out
|
||||
whether it should pass or not. See http://is.gd/fNOFb
|
||||
- Added dates to changes file, as far as we can from backpan et al
|
||||
- Fix for DB::args bug (thanks Peter Rabbitson)
|
||||
- Fix for bizarre-copy bug (thanks Peter Rabbitson)
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Wed Jan 13 16:40:46 CET 2010 - anicka@suse.cz
|
||||
|
||||
- update to 0.29
|
||||
* Patch to fix code with Sub::Uplevel again.
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Sun Dec 20 16:41:11 CET 2009 - jengelh@medozas.de
|
||||
|
||||
- enable parallel build
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Sat Jul 25 19:44:26 CEST 2009 - chris@computersalat.de
|
||||
|
||||
- spec mods
|
||||
* removed ^----------
|
||||
* removed ^#---------
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Jul 14 11:32:17 CEST 2009 - chris@computersalat.de
|
||||
|
||||
- fixed deps
|
||||
o Req for Test::Builder
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Wed Jul 1 13:12:01 CEST 2009 - chris@computersalat.de
|
||||
|
||||
- added perl-macros
|
||||
o autogen filelist with perl_gen_filelist
|
||||
- spec mods
|
||||
o added header
|
||||
o fixed deps
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Mon Feb 25 13:46:44 CET 2008 - anicka@suse.cz
|
||||
|
||||
- update to 0.27
|
||||
* Patch to fix my broken code with the now working Sub::Uplevel.
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Dec 13 14:27:59 CET 2007 - anicka@suse.cz
|
||||
|
||||
- update to 0.26
|
||||
* Added some more exposition on the usage of dies_ok() and
|
||||
lives_ok() for those who found them confusing. Also reordered
|
||||
presentation of docs so more specific throws_ok() comes first.
|
||||
* Some misc. documentation tweaks.
|
||||
* Added some tests for RT#24678, but not actually fixed them yet
|
||||
* Added comment in docs about T::E not catching exit() in eval()
|
||||
blocks
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Jun 14 18:17:42 CEST 2007 - anicka@suse.cz
|
||||
|
||||
- package created (version 0.25)
|
||||
|
||||
227
perl-Test-Exception.spec
Normal file
227
perl-Test-Exception.spec
Normal file
@ -0,0 +1,227 @@
|
||||
#
|
||||
# spec file for package perl-Test-Exception
|
||||
#
|
||||
# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
|
||||
#
|
||||
# All modifications and additions to the file contributed by third parties
|
||||
# remain the property of their copyright owners, unless otherwise agreed
|
||||
# upon. The license for this file, and modifications and additions to the
|
||||
# file, is the same license as for the pristine package itself (unless the
|
||||
# license for the pristine package is not an Open Source License, in which
|
||||
# case the license is the MIT License). An "Open Source License" is a
|
||||
# license that conforms to the Open Source Definition (Version 1.9)
|
||||
# published by the Open Source Initiative.
|
||||
|
||||
# Please submit bugfixes or comments via http://bugs.opensuse.org/
|
||||
#
|
||||
|
||||
|
||||
Name: perl-Test-Exception
|
||||
Version: 0.430000
|
||||
Release: 0
|
||||
%define cpan_version 0.43
|
||||
Provides: perl(Test::Exception) = 0.430000
|
||||
%define cpan_name Test-Exception
|
||||
Summary: Test exception-based code
|
||||
License: Artistic-1.0 or GPL-1.0+
|
||||
Group: Development/Libraries/Perl
|
||||
Url: http://search.cpan.org/dist/Test-Exception/
|
||||
Source0: http://www.cpan.org/authors/id/E/EX/EXODIST/%{cpan_name}-%{cpan_version}.tar.gz
|
||||
Source1: cpanspec.yml
|
||||
BuildArch: noarch
|
||||
BuildRoot: %{_tmppath}/%{name}-%{version}-build
|
||||
BuildRequires: perl
|
||||
BuildRequires: perl-macros
|
||||
BuildRequires: perl(Sub::Uplevel) >= 0.18
|
||||
BuildRequires: perl(Test::Builder) >= 0.7
|
||||
BuildRequires: perl(Test::Builder::Tester) >= 1.07
|
||||
BuildRequires: perl(Test::More) >= 0.7
|
||||
Requires: perl(Sub::Uplevel) >= 0.18
|
||||
Requires: perl(Test::Builder) >= 0.7
|
||||
Requires: perl(Test::Builder::Tester) >= 1.07
|
||||
%{perl_requires}
|
||||
|
||||
%description
|
||||
This module provides a few convenience methods for testing exception based
|
||||
code. It is built with Test::Builder and plays happily with Test::More and
|
||||
friends.
|
||||
|
||||
If you are not already familiar with Test::More now would be the time to go
|
||||
take a look.
|
||||
|
||||
You can specify the test plan when you 'use Test::Exception' in the same
|
||||
way as 'use Test::More'. See Test::More for details.
|
||||
|
||||
NOTE: Test::Exception only checks for exceptions. It will ignore other
|
||||
methods of stopping program execution - including exit(). If you have an
|
||||
exit() in evalled code Test::Exception will not catch this with any of its
|
||||
testing functions.
|
||||
|
||||
NOTE: This module uses Sub::Uplevel and relies on overriding
|
||||
'CORE::GLOBAL::caller' to hide your test blocks from the call stack. If
|
||||
this use of global overrides concerns you, the Test::Fatal module offers a
|
||||
more minimalist alternative.
|
||||
|
||||
* *throws_ok*
|
||||
|
||||
Tests to see that a specific exception is thrown. throws_ok() has two
|
||||
forms:
|
||||
|
||||
throws_ok BLOCK REGEX, TEST_DESCRIPTION
|
||||
throws_ok BLOCK CLASS, TEST_DESCRIPTION
|
||||
|
||||
In the first form the test passes if the stringified exception matches the
|
||||
give regular expression. For example:
|
||||
|
||||
throws_ok { read_file( 'unreadable' ) } qr/No file/, 'no file';
|
||||
|
||||
If your perl does not support 'qr//' you can also pass a regex-like string,
|
||||
for example:
|
||||
|
||||
throws_ok { read_file( 'unreadable' ) } '/No file/', 'no file';
|
||||
|
||||
The second form of throws_ok() test passes if the exception is of the same
|
||||
class as the one supplied, or a subclass of that class. For example:
|
||||
|
||||
throws_ok { $foo->bar } "Error::Simple", 'simple error';
|
||||
|
||||
Will only pass if the 'bar' method throws an Error::Simple exception, or a
|
||||
subclass of an Error::Simple exception.
|
||||
|
||||
You can get the same effect by passing an instance of the exception you
|
||||
want to look for. The following is equivalent to the previous example:
|
||||
|
||||
my $SIMPLE = Error::Simple->new;
|
||||
throws_ok { $foo->bar } $SIMPLE, 'simple error';
|
||||
|
||||
Should a throws_ok() test fail it produces appropriate diagnostic messages.
|
||||
For example:
|
||||
|
||||
not ok 3 - simple error
|
||||
# Failed test (test.t at line 48)
|
||||
# expecting: Error::Simple exception
|
||||
# found: normal exit
|
||||
|
||||
Like all other Test::Exception functions you can avoid prototypes by
|
||||
passing a subroutine explicitly:
|
||||
|
||||
throws_ok( sub {$foo->bar}, "Error::Simple", 'simple error' );
|
||||
|
||||
A true value is returned if the test succeeds, false otherwise. On exit $@
|
||||
is guaranteed to be the cause of death (if any).
|
||||
|
||||
A description of the exception being checked is used if no optional test
|
||||
description is passed.
|
||||
|
||||
NOTE: Remember when you 'die $string_without_a_trailing_newline' perl will
|
||||
automatically add the current script line number, input line number and a
|
||||
newline. This will form part of the string that throws_ok regular
|
||||
expressions match against.
|
||||
|
||||
* *dies_ok*
|
||||
|
||||
Checks that a piece of code dies, rather than returning normally. For
|
||||
example:
|
||||
|
||||
sub div {
|
||||
my ( $a, $b ) = @_;
|
||||
return $a / $b;
|
||||
};
|
||||
|
||||
dies_ok { div( 1, 0 ) } 'divide by zero detected';
|
||||
|
||||
# or if you don't like prototypes
|
||||
dies_ok( sub { div( 1, 0 ) }, 'divide by zero detected' );
|
||||
|
||||
A true value is returned if the test succeeds, false otherwise. On exit $@
|
||||
is guaranteed to be the cause of death (if any).
|
||||
|
||||
Remember: This test will pass if the code dies for any reason. If you care
|
||||
about the reason it might be more sensible to write a more specific test
|
||||
using throws_ok().
|
||||
|
||||
The test description is optional, but recommended.
|
||||
|
||||
* *lives_ok*
|
||||
|
||||
Checks that a piece of code doesn't die. This allows your test script to
|
||||
continue, rather than aborting if you get an unexpected exception. For
|
||||
example:
|
||||
|
||||
sub read_file {
|
||||
my $file = shift;
|
||||
local $/;
|
||||
open my $fh, '<', $file or die "open failed ($!)\n";
|
||||
$file = <FILE>;
|
||||
return $file;
|
||||
};
|
||||
|
||||
my $file;
|
||||
lives_ok { $file = read_file('test.txt') } 'file read';
|
||||
|
||||
# or if you don't like prototypes
|
||||
lives_ok( sub { $file = read_file('test.txt') }, 'file read' );
|
||||
|
||||
Should a lives_ok() test fail it produces appropriate diagnostic messages.
|
||||
For example:
|
||||
|
||||
not ok 1 - file read
|
||||
# Failed test (test.t at line 15)
|
||||
# died: open failed (No such file or directory)
|
||||
|
||||
A true value is returned if the test succeeds, false otherwise. On exit $@
|
||||
is guaranteed to be the cause of death (if any).
|
||||
|
||||
The test description is optional, but recommended.
|
||||
|
||||
* *lives_and*
|
||||
|
||||
Run a test that may throw an exception. For example, instead of doing:
|
||||
|
||||
my $file;
|
||||
lives_ok { $file = read_file('answer.txt') } 'read_file worked';
|
||||
is $file, "42", 'answer was 42';
|
||||
|
||||
You can use lives_and() like this:
|
||||
|
||||
lives_and { is read_file('answer.txt'), "42" } 'answer is 42';
|
||||
# or if you don't like prototypes
|
||||
lives_and(sub {is read_file('answer.txt'), "42"}, 'answer is 42');
|
||||
|
||||
Which is the same as doing
|
||||
|
||||
is read_file('answer.txt'), "42\n", 'answer is 42';
|
||||
|
||||
unless 'read_file('answer.txt')' dies, in which case you get the same kind
|
||||
of error as lives_ok()
|
||||
|
||||
not ok 1 - answer is 42
|
||||
# Failed test (test.t at line 15)
|
||||
# died: open failed (No such file or directory)
|
||||
|
||||
A true value is returned if the test succeeds, false otherwise. On exit $@
|
||||
is guaranteed to be the cause of death (if any).
|
||||
|
||||
The test description is optional, but recommended.
|
||||
|
||||
%prep
|
||||
%setup -q -n %{cpan_name}-%{cpan_version}
|
||||
find . -type f ! -name \*.pl -print0 | xargs -0 chmod 644
|
||||
|
||||
%build
|
||||
%{__perl} Makefile.PL INSTALLDIRS=vendor
|
||||
%{__make} %{?_smp_mflags}
|
||||
|
||||
%check
|
||||
%{__make} test
|
||||
|
||||
%install
|
||||
%perl_make_install
|
||||
%perl_process_packlist
|
||||
%perl_gen_filelist
|
||||
|
||||
%files -f %{name}.files
|
||||
%defattr(-,root,root,755)
|
||||
%doc Changes
|
||||
|
||||
%changelog
|
||||
Loading…
Reference in New Issue
Block a user