Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Test-Without-Module for
openSUSE:Factory checked in at 2022-12-14 14:10:47
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Test-Without-Module (Old)
and /work/SRC/openSUSE:Factory/.perl-Test-Without-Module.new.1835 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Test-Without-Module"
Wed Dec 14 14:10:47 2022 rev:7 rq:1042615 version:0.21
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Test-Without-Module/perl-Test-Without-Module.changes
2017-04-20 20:52:43.856854625 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Test-Without-Module.new.1835/perl-Test-Without-Module.changes
2022-12-14 14:10:56.335474934 +0100
@@ -1,0 +2,6 @@
+Sun Dec 11 03:07:14 UTC 2022 - Tina Müller <[email protected]>
+
+- updated to 0.21
+ see /usr/share/doc/packages/perl-Test-Without-Module/Changes
+
+-------------------------------------------------------------------
Old:
----
Test-Without-Module-0.20.tar.gz
New:
----
Test-Without-Module-0.21.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Test-Without-Module.spec ++++++
--- /var/tmp/diff_new_pack.VR1RnN/_old 2022-12-14 14:10:58.511486127 +0100
+++ /var/tmp/diff_new_pack.VR1RnN/_new 2022-12-14 14:10:58.515486148 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Test-Without-Module
#
-# Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2022 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -12,22 +12,20 @@
# 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/
+# Please submit bugfixes or comments via https://bugs.opensuse.org/
#
+%define cpan_name Test-Without-Module
Name: perl-Test-Without-Module
-Version: 0.20
+Version: 0.21
Release: 0
-%define cpan_name Test-Without-Module
+License: Artistic-1.0 OR GPL-1.0-or-later
Summary: Test fallback behaviour in absence of modules
-License: Artistic-1.0 or GPL-1.0+
-Group: Development/Libraries/Perl
-Url: http://search.cpan.org/dist/Test-Without-Module/
+URL: https://metacpan.org/release/%{cpan_name}
Source0:
https://cpan.metacpan.org/authors/id/C/CO/CORION/%{cpan_name}-%{version}.tar.gz
Source1: cpanspec.yml
BuildArch: noarch
-BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
BuildRequires: perl-macros
%{perl_requires}
@@ -38,15 +36,15 @@
have a fallback when a certain dependency module is not installed.
%prep
-%setup -q -n %{cpan_name}-%{version}
-find . -type f ! -name \*.pl -print0 | xargs -0 chmod 644
+%autosetup -n %{cpan_name}-%{version}
+find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path
"*/script/*" ! -name "configure" -print0 | xargs -0 chmod 644
%build
-%{__perl} Makefile.PL INSTALLDIRS=vendor
-%{__make} %{?_smp_mflags}
+perl Makefile.PL INSTALLDIRS=vendor
+%make_build
%check
-%{__make} test
+make test
%install
%perl_make_install
@@ -54,7 +52,6 @@
%perl_gen_filelist
%files -f %{name}.files
-%defattr(-,root,root,755)
%doc Changes README README.mkdn
%changelog
++++++ Test-Without-Module-0.20.tar.gz -> Test-Without-Module-0.21.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/Changes
new/Test-Without-Module-0.21/Changes
--- old/Test-Without-Module-0.20/Changes 2017-04-09 17:49:58.000000000
+0200
+++ new/Test-Without-Module-0.21/Changes 2022-12-10 08:21:36.000000000
+0100
@@ -3,86 +3,89 @@
Todo:
- Add way to allow only core modules (suggested by SREZIC)
-0.20 20170409
+0.21 2022-12-10
+ - Harden test suite against changed error message coming with 5.38
+
+0.20 2017-04-09
- Make tests more resilient against old versions of Carp.pm (Paul Howarth)
Also addresses
https://rt.cpan.org/Public/Bug/Display.html?id=121002
- Typo fixes (Paul Howarth)
- Rework test suite, move author tests below xt/
-0.19 20170330
+0.19 2017-03-30
- Make error message more like the original Perl error message (haarg)
- Makefile.PL overhaul (by Abzal Serekov)
- Generate README.md
-0.18 20140830
+0.18 2014-08-30
- Eliminate segfault on Perl 5.8 (by Graham Knop, Karen Etheridge, RT 98207)
- Only add the @INC hook once (by Graham Knop, RT #91857)
- Updated documentation
-0.17 20090118
+0.17 2009-01-18
- Made license explicit in the metadata (for those versions
of EU:MM that support it)
! Changed module comparison from using a regular expression
to string equality. That means that ugly actions at a distance
by matching substrings shouldn't happen.
-0.16 20081020
+0.16 2008-10-20
- Add a test that exhibits the "redefined" warnings upon disallowing
and then reallowing a module
- Fixed the code so no more warnings get issued. [RT#40065]
-0.15 20071021
+0.15 2007-10-21
- Now really restored compatibility of the tests with Perl 5.005,
using lexical filehandles does not work under 5.005...
. No functional changes, no upgrade is necessary
-0.14 20071020
+0.14 2007-10-20
- Hopefully restored compatibility of the tests with Perl 5.005 this time,
reported by SREZIC
. No functional changes, no upgrade is necessary
-0.13 20071020
+0.13 2007-10-20
- Restored compatibility of the tests with Perl 5.005, reported by SREZIC
. No functional changes, no upgrade is necessary
-0.12 20071020
+0.12 2007-10-20
- Fixed RT [rt.cpan.org #24735], reported by Slaven Rezic
This seems to have been some really weird interaction or maybe
eating of $@.
-0.11 20070819
+0.11 2007-08-19
- File::Slurp is now no prerequisite anymore - the test
requiring it is now optional
-0.10 20070804
+0.10 2007-08-04
- Added missing File::Slurp prerequisite. Thanks to ANDK and
the CPAN smoke testers to alert me to this
- No functional changes. No upgrade from 0.09 is necessary.
-0.09 20061231
+0.09 2006-12-31
- Added more consistency tests
- Added Jerrad Pierce to the list of those
who mentioned the command line use. I forgot
the usage NUFFIN had given, so both were
genuinely new to me.
-0.08 20061229
+0.08 2006-12-29
- Removed superfluous File::Temp usage from module
-0.07 20061229
+0.07 2006-12-29
- No more inline pod tests
- No code changes since 0.06
-0.06 20030320
+0.06 2003-03-20
- fixed the inline test pod
- Now needs Test::Pod 0.95 (or skips the pod test)
-0.03 20030217
+0.03 2003-02-17
- Released on CPAN
- Fixes so the pod for the fake module doesn't appear
in the main pod.
-0.02 20030216
+0.02 2003-02-16
- Released on CPAN
0.01 Sat Feb 15 21:14:45 2003
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/MANIFEST
new/Test-Without-Module-0.21/MANIFEST
--- old/Test-Without-Module-0.20/MANIFEST 2017-04-09 17:49:58.000000000
+0200
+++ new/Test-Without-Module-0.21/MANIFEST 2017-07-20 22:06:10.000000000
+0200
@@ -14,6 +14,7 @@
t/05-redefine.t
t/06-missing-hidden-modules.t
t/embedded-Test-Without-Module.t
+t/rt122551.t
Texts/article.txt
xt/99-changes.t
xt/99-compile.t
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/MANIFEST.SKIP
new/Test-Without-Module-0.21/MANIFEST.SKIP
--- old/Test-Without-Module-0.20/MANIFEST.SKIP 2017-04-09 17:49:58.000000000
+0200
+++ new/Test-Without-Module-0.21/MANIFEST.SKIP 2017-07-20 22:06:10.000000000
+0200
@@ -12,3 +12,4 @@
^MANIFEST.bak$
^MYMETA.*
^.git
+^.travis.yml
\ No newline at end of file
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/META.json
new/Test-Without-Module-0.21/META.json
--- old/Test-Without-Module-0.20/META.json 2017-04-09 17:50:02.000000000
+0200
+++ new/Test-Without-Module-0.21/META.json 2022-12-10 08:21:44.000000000
+0100
@@ -4,13 +4,13 @@
"Max Maischein <[email protected]>"
],
"dynamic_config" : 0,
- "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter
version 2.150005",
+ "generated_by" : "ExtUtils::MakeMaker version 7.44, CPAN::Meta::Converter
version 2.150010",
"license" : [
"perl_5"
],
"meta-spec" : {
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";,
- "version" : "2"
+ "version" : 2
},
"name" : "Test-Without-Module",
"no_index" : {
@@ -19,10 +19,29 @@
"inc"
]
},
+ "prereqs" : {
+ "build" : {
+ "requires" : {
+ "File::Find" : "0",
+ "File::Spec" : "0",
+ "Test::More" : "0"
+ }
+ },
+ "configure" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "runtime" : {
+ "requires" : {
+ "Carp" : "0"
+ }
+ }
+ },
"provides" : {
"Test::Without::Module" : {
"file" : "lib/Test/Without/Module.pm",
- "version" : "0.20"
+ "version" : "0.21"
}
},
"release_status" : "stable",
@@ -36,7 +55,7 @@
"web" : "https://github.com/Corion/test-without-module";
}
},
- "version" : "0.20",
- "x_serialization_backend" : "JSON::PP version 2.27202",
+ "version" : "0.21",
+ "x_serialization_backend" : "JSON::PP version 4.11",
"x_static_install" : 1
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/META.yml
new/Test-Without-Module-0.21/META.yml
--- old/Test-Without-Module-0.20/META.yml 2017-04-09 17:50:02.000000000
+0200
+++ new/Test-Without-Module-0.21/META.yml 2022-12-10 08:21:44.000000000
+0100
@@ -2,9 +2,14 @@
abstract: 'Test fallback behaviour in absence of modules'
author:
- 'Max Maischein <[email protected]>'
-build_requires: {}
+build_requires:
+ File::Find: '0'
+ File::Spec: '0'
+ Test::More: '0'
+configure_requires:
+ ExtUtils::MakeMaker: '0'
dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version
2.150005'
+generated_by: 'ExtUtils::MakeMaker version 7.44, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -17,10 +22,12 @@
provides:
Test::Without::Module:
file: lib/Test/Without/Module.pm
- version: '0.20'
+ version: '0.21'
+requires:
+ Carp: '0'
resources:
license: http://dev.perl.org/licenses/
repository: git://github.com/Corion/test-without-module.git
-version: '0.20'
+version: '0.21'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
x_static_install: 1
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/Makefile.PL
new/Test-Without-Module-0.21/Makefile.PL
--- old/Test-Without-Module-0.20/Makefile.PL 2017-04-09 17:49:58.000000000
+0200
+++ new/Test-Without-Module-0.21/Makefile.PL 2017-07-20 22:06:10.000000000
+0200
@@ -104,6 +104,11 @@
$parser->parse_from_file($_[0]);
open my $fh, '>', 'README.mkdn'
or die "Couldn't open 'README.mkdn': $!";
+ print $fh <<STATUS;
+
+[](https://github.com/Corion/test-without-module)
+
+STATUS
print $fh $parser->as_markdown;
};
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/README
new/Test-Without-Module-0.21/README
--- old/Test-Without-Module-0.20/README 2017-04-09 17:49:58.000000000 +0200
+++ new/Test-Without-Module-0.21/README 2022-12-10 08:21:43.000000000 +0100
@@ -1,90 +1,90 @@
-NAME
-
- Test::Without::Module - Test fallback behaviour in absence of modules
-
-SYNOPSIS
-
- use Test::Without::Module qw( My::Module );
-
- # Now, loading of My::Module fails :
- eval { require My::Module; };
- warn $@ if $@;
-
- # Now it works again
- eval q{ no Test::Without::Module qw( My::Module ) };
- eval { require My::Module; };
- print "Found My::Module" unless $@;
-
-DESCRIPTION
-
- This module allows you to deliberately hide modules from a program even
- though they are installed. This is mostly useful for testing modules
- that have a fallback when a certain dependency module is not installed.
-
- EXPORT
-
- None. All magic is done via use Test::Without::Module LIST and no
- Test::Without::Module LIST.
-
- Test::Without::Module::get_forbidden_list
-
- This function returns a reference to a copy of the current hash of
- forbidden modules or an empty hash if none are currently forbidden.
- This is convenient if you are testing and/or debugging this module.
-
-ONE LINER
-
- A neat trick for using this module from the command line was mentioned
- to me by NUFFIN and by Jerrad Pierce:
-
- perl -MTest::Without::Module=Some::Module -w -Iblib/lib t/SomeModule.t
-
- That way, you can easily see how your module or test file behaves when
- a certain module is unavailable.
-
-BUGS
-
- * There is no lexical scoping
-
-CREDITS
-
- Much improvement must be thanked to Aristotle from PerlMonks, he
- pointed me to a much less convoluted way to fake a module at
- https://perlmonks.org?node=192635.
-
- I also discussed with him an even more elegant way of overriding
- CORE::GLOBAL::require, but the parsing of the overridden subroutine
- didn't work out the way I wanted it - CORE::require didn't recognize
- barewords as such anymore.
-
- NUFFIN and Jerrad Pierce pointed out the convenient use from the
- command line to interactively watch the behaviour of the test suite and
- module in absence of a module.
-
-AUTHOR
-
- Copyright (c) 2003-2014 Max Maischein, <[email protected]>
-
-LICENSE
-
- This module is released under the same terms as Perl itself.
-
-REPOSITORY
-
- The public repository of this module is
- https://github.com/Corion/test-without-module.
-
-SUPPORT
-
- The public support forum of this module is https://perlmonks.org/.
-
-BUG TRACKER
-
- Please report bugs in this module via the RT CPAN bug queue at
- https://rt.cpan.org/Public/Dist/Display.html?Name=Test-Without-Module
- or via mail to [email protected].
-
-SEE ALSO
-
- Devel::Hide, Acme::Intraweb, PAR, perlfunc
-
+NAME
+
+ Test::Without::Module - Test fallback behaviour in absence of modules
+
+SYNOPSIS
+
+ use Test::Without::Module qw( My::Module );
+
+ # Now, loading of My::Module fails :
+ eval { require My::Module; };
+ warn $@ if $@;
+
+ # Now it works again
+ eval q{ no Test::Without::Module qw( My::Module ) };
+ eval { require My::Module; };
+ print "Found My::Module" unless $@;
+
+DESCRIPTION
+
+ This module allows you to deliberately hide modules from a program even
+ though they are installed. This is mostly useful for testing modules
+ that have a fallback when a certain dependency module is not installed.
+
+ EXPORT
+
+ None. All magic is done via use Test::Without::Module LIST and no
+ Test::Without::Module LIST.
+
+ Test::Without::Module::get_forbidden_list
+
+ This function returns a reference to a copy of the current hash of
+ forbidden modules or an empty hash if none are currently forbidden.
+ This is convenient if you are testing and/or debugging this module.
+
+ONE LINER
+
+ A neat trick for using this module from the command line was mentioned
+ to me by NUFFIN and by Jerrad Pierce:
+
+ perl -MTest::Without::Module=Some::Module -w -Iblib/lib t/SomeModule.t
+
+ That way, you can easily see how your module or test file behaves when
+ a certain module is unavailable.
+
+BUGS
+
+ * There is no lexical scoping
+
+CREDITS
+
+ Much improvement must be thanked to Aristotle from PerlMonks, he
+ pointed me to a much less convoluted way to fake a module at
+ https://perlmonks.org?node=192635.
+
+ I also discussed with him an even more elegant way of overriding
+ CORE::GLOBAL::require, but the parsing of the overridden subroutine
+ didn't work out the way I wanted it - CORE::require didn't recognize
+ barewords as such anymore.
+
+ NUFFIN and Jerrad Pierce pointed out the convenient use from the
+ command line to interactively watch the behaviour of the test suite and
+ module in absence of a module.
+
+AUTHOR
+
+ Copyright (c) 2003-2014 Max Maischein, <[email protected]>
+
+LICENSE
+
+ This module is released under the same terms as Perl itself.
+
+REPOSITORY
+
+ The public repository of this module is
+ https://github.com/Corion/test-without-module.
+
+SUPPORT
+
+ The public support forum of this module is https://perlmonks.org/.
+
+BUG TRACKER
+
+ Please report bugs in this module via the RT CPAN bug queue at
+ https://rt.cpan.org/Public/Dist/Display.html?Name=Test-Without-Module
+ or via mail to [email protected].
+
+SEE ALSO
+
+ Devel::Hide, Acme::Intraweb, PAR, perlfunc
+
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/README.mkdn
new/Test-Without-Module-0.21/README.mkdn
--- old/Test-Without-Module-0.20/README.mkdn 2017-04-09 17:49:58.000000000
+0200
+++ new/Test-Without-Module-0.21/README.mkdn 2022-12-10 08:21:43.000000000
+0100
@@ -1,91 +1,94 @@
-# NAME
-
-Test::Without::Module - Test fallback behaviour in absence of modules
-
-# SYNOPSIS
-
- use Test::Without::Module qw( My::Module );
-
- # Now, loading of My::Module fails :
- eval { require My::Module; };
- warn $@ if $@;
-
- # Now it works again
- eval q{ no Test::Without::Module qw( My::Module ) };
- eval { require My::Module; };
- print "Found My::Module" unless $@;
-
-# DESCRIPTION
-
-This module allows you to deliberately hide modules from a program
-even though they are installed. This is mostly useful for testing modules
-that have a fallback when a certain dependency module is not installed.
-
-## EXPORT
-
-None. All magic is done via `use Test::Without::Module LIST` and
-`no Test::Without::Module LIST`.
-
-## Test::Without::Module::get\_forbidden\_list
-
-This function returns a reference to a copy of the current hash of forbidden
-modules or an empty hash if none are currently forbidden. This is convenient
-if you are testing and/or debugging this module.
-
-# ONE LINER
-
-A neat trick for using this module from the command line
-was mentioned to me by NUFFIN and by Jerrad Pierce:
-
- perl -MTest::Without::Module=Some::Module -w -Iblib/lib t/SomeModule.t
-
-That way, you can easily see how your module or test file behaves
-when a certain module is unavailable.
-
-# BUGS
-
-- There is no lexical scoping
-
-# CREDITS
-
-Much improvement must be thanked to Aristotle from PerlMonks, he pointed me
-to a much less convoluted way to fake a module at
-[https://perlmonks.org?node=192635](https://perlmonks.org?node=192635).
-
-I also discussed with him an even more elegant way of overriding
-CORE::GLOBAL::require, but the parsing of the overridden subroutine
-didn't work out the way I wanted it - CORE::require didn't recognize
-barewords as such anymore.
-
-NUFFIN and Jerrad Pierce pointed out the convenient
-use from the command line to interactively watch the
-behaviour of the test suite and module in absence
-of a module.
-
-# AUTHOR
-
-Copyright (c) 2003-2014 Max Maischein, <[email protected]>
-
-# LICENSE
-
-This module is released under the same terms as Perl itself.
-
-# REPOSITORY
-
-The public repository of this module is
-[https://github.com/Corion/test-without-module](https://github.com/Corion/test-without-module).
-
-# SUPPORT
-
-The public support forum of this module is
-[https://perlmonks.org/](https://perlmonks.org/).
-
-# BUG TRACKER
-
-Please report bugs in this module via the RT CPAN bug queue at
-[https://rt.cpan.org/Public/Dist/Display.html?Name=Test-Without-Module](https://rt.cpan.org/Public/Dist/Display.html?Name=Test-Without-Module)
-or via mail to
[[email protected]](https://metacpan.org/pod/[email protected]).
-
-# SEE ALSO
-
-[Devel::Hide](https://metacpan.org/pod/Devel::Hide),
[Acme::Intraweb](https://metacpan.org/pod/Acme::Intraweb),
[PAR](https://metacpan.org/pod/PAR),
[perlfunc](https://metacpan.org/pod/perlfunc)
+
+[](https://github.com/Corion/test-without-module)
+
+# NAME
+
+Test::Without::Module - Test fallback behaviour in absence of modules
+
+# SYNOPSIS
+
+ use Test::Without::Module qw( My::Module );
+
+ # Now, loading of My::Module fails :
+ eval { require My::Module; };
+ warn $@ if $@;
+
+ # Now it works again
+ eval q{ no Test::Without::Module qw( My::Module ) };
+ eval { require My::Module; };
+ print "Found My::Module" unless $@;
+
+# DESCRIPTION
+
+This module allows you to deliberately hide modules from a program
+even though they are installed. This is mostly useful for testing modules
+that have a fallback when a certain dependency module is not installed.
+
+## EXPORT
+
+None. All magic is done via `use Test::Without::Module LIST` and
+`no Test::Without::Module LIST`.
+
+## Test::Without::Module::get\_forbidden\_list
+
+This function returns a reference to a copy of the current hash of forbidden
+modules or an empty hash if none are currently forbidden. This is convenient
+if you are testing and/or debugging this module.
+
+# ONE LINER
+
+A neat trick for using this module from the command line
+was mentioned to me by NUFFIN and by Jerrad Pierce:
+
+ perl -MTest::Without::Module=Some::Module -w -Iblib/lib t/SomeModule.t
+
+That way, you can easily see how your module or test file behaves
+when a certain module is unavailable.
+
+# BUGS
+
+- There is no lexical scoping
+
+# CREDITS
+
+Much improvement must be thanked to Aristotle from PerlMonks, he pointed me
+to a much less convoluted way to fake a module at
+[https://perlmonks.org?node=192635](https://perlmonks.org?node=192635).
+
+I also discussed with him an even more elegant way of overriding
+CORE::GLOBAL::require, but the parsing of the overridden subroutine
+didn't work out the way I wanted it - CORE::require didn't recognize
+barewords as such anymore.
+
+NUFFIN and Jerrad Pierce pointed out the convenient
+use from the command line to interactively watch the
+behaviour of the test suite and module in absence
+of a module.
+
+# AUTHOR
+
+Copyright (c) 2003-2014 Max Maischein, <[email protected]>
+
+# LICENSE
+
+This module is released under the same terms as Perl itself.
+
+# REPOSITORY
+
+The public repository of this module is
+[https://github.com/Corion/test-without-module](https://github.com/Corion/test-without-module).
+
+# SUPPORT
+
+The public support forum of this module is
+[https://perlmonks.org/](https://perlmonks.org/).
+
+# BUG TRACKER
+
+Please report bugs in this module via the RT CPAN bug queue at
+[https://rt.cpan.org/Public/Dist/Display.html?Name=Test-Without-Module](https://rt.cpan.org/Public/Dist/Display.html?Name=Test-Without-Module)
+or via mail to
[[email protected]](https://metacpan.org/pod/test-without-module-Bugs%40rt.cpan.org).
+
+# SEE ALSO
+
+[Devel::Hide](https://metacpan.org/pod/Devel%3A%3AHide),
[Acme::Intraweb](https://metacpan.org/pod/Acme%3A%3AIntraweb),
[PAR](https://metacpan.org/pod/PAR),
[perlfunc](https://metacpan.org/pod/perlfunc)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/lib/Test/Without/Module.pm
new/Test-Without-Module-0.21/lib/Test/Without/Module.pm
--- old/Test-Without-Module-0.20/lib/Test/Without/Module.pm 2017-04-09
17:49:58.000000000 +0200
+++ new/Test-Without-Module-0.21/lib/Test/Without/Module.pm 2022-12-10
08:21:36.000000000 +0100
@@ -3,7 +3,7 @@
use Carp qw( croak );
use vars qw( $VERSION );
-$VERSION = '0.20';
+$VERSION = '0.21';
use vars qw(%forbidden);
@@ -84,20 +84,16 @@
=head1 SYNOPSIS
-=for example begin
+ use Test::Without::Module qw( My::Module );
- use Test::Without::Module qw( My::Module );
-
- # Now, loading of My::Module fails :
- eval { require My::Module; };
- warn $@ if $@;
-
- # Now it works again
- eval q{ no Test::Without::Module qw( My::Module ) };
- eval { require My::Module; };
- print "Found My::Module" unless $@;
-
-=for example end
+ # Now, loading of My::Module fails :
+ eval { require My::Module; };
+ warn $@ if $@;
+
+ # Now it works again
+ eval q{ no Test::Without::Module qw( My::Module ) };
+ eval { require My::Module; };
+ print "Found My::Module" unless $@;
=head1 DESCRIPTION
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore'
old/Test-Without-Module-0.20/t/06-missing-hidden-modules.t
new/Test-Without-Module-0.21/t/06-missing-hidden-modules.t
--- old/Test-Without-Module-0.20/t/06-missing-hidden-modules.t 2017-04-09
17:49:58.000000000 +0200
+++ new/Test-Without-Module-0.21/t/06-missing-hidden-modules.t 2022-12-10
08:21:36.000000000 +0100
@@ -18,7 +18,7 @@
my ($failed,$error,$inc) = tryload( 'Nonexisting::Module' );
is $failed, 1, "Self-test, a non-existing module fails to load";
-like $error, qr!^Can't locate Nonexisting/Module.pm in \@INC( \(you may need
to install the Nonexisting::Module module\))? \(\@INC contains: ...\) line
(\d+).!,
+like $error, qr!^Can't locate Nonexisting/Module.pm in \@INC( \(you may need
to install the Nonexisting::Module module\))? \(\@INC !,
'Self-test, error message shows @INC';
#diag $error;
@@ -28,5 +28,5 @@
($failed,$error,$inc) = tryload( 'IO::Socket' );
is $failed, 1, "a non-existing module fails to load";
-like $error, qr!Can't locate IO/Socket.pm in \@INC( \(you may need to install
the IO::Socket module\))? \(\@INC contains: ...\) line (\d+)!, 'error message
for hidden module shows @INC';
+like $error, qr!Can't locate IO/Socket.pm in \@INC( \(you may need to install
the IO::Socket module\))? \(\@INC !, 'error message for hidden module shows
@INC';
#diag $error;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/t/rt122551.t
new/Test-Without-Module-0.21/t/rt122551.t
--- old/Test-Without-Module-0.20/t/rt122551.t 1970-01-01 01:00:00.000000000
+0100
+++ new/Test-Without-Module-0.21/t/rt122551.t 2022-12-10 08:21:36.000000000
+0100
@@ -0,0 +1,29 @@
+#!/usr/bin/perl -w
+use strict;
+use Test::More tests => 2;
+
+BEGIN {
+ if( ! eval { require Module::Load::Conditional; 1 }) {
+ SKIP: {
+ skip "Module::Load::Conditional not installed: $@", 2;
+ };
+ };
+};
+use Test::Without::Module qw(Test::More);
+
+local $TODO = 'Module::Load::Conditional doesn\'t guard against failures in
@INC hook';
+
+my $lived = eval {
+ my $res = Module::Load::Conditional::can_load(
+ modules => {
+ 'Test::More' => undef,
+ }
+ );
+ ok !$res, "We don't load Test::More";
+ 1;
+};
+ok $lived or diag "Caught error $@";
+
+diag "Test::Without::Module: $Test::Without::Module::VERSION";
+diag "Module::Load::Conditional: $Module::Load::Conditional::VERSION";
+done_testing;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/xt/99-changes.t
new/Test-Without-Module-0.21/xt/99-changes.t
--- old/Test-Without-Module-0.20/xt/99-changes.t 2017-04-09
17:49:58.000000000 +0200
+++ new/Test-Without-Module-0.21/xt/99-changes.t 2022-12-10
08:21:36.000000000 +0100
@@ -28,5 +28,5 @@
ok $changes =~ /^(.*$version.*)$/m, "We find version $version for $module";
my $changes_line = $1;
-ok $changes_line =~ /$version\s+20\d{6}/, "We find a release date on the same
line"
+ok $changes_line =~ /$version\s+20\d{2}-\d{2}-\d{2}/, "We find a release date
on the same line"
or diag $changes_line;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/xt/99-synopsis.t
new/Test-Without-Module-0.21/xt/99-synopsis.t
--- old/Test-Without-Module-0.20/xt/99-synopsis.t 2017-04-09
17:49:58.000000000 +0200
+++ new/Test-Without-Module-0.21/xt/99-synopsis.t 2017-07-20
22:06:10.000000000 +0200
@@ -12,7 +12,7 @@
my @files;
my $blib = File::Spec->catfile(qw(blib lib));
-find(\&wanted, grep { -d } ($blib, 'bin'));
+find(\&wanted, grep { -d } ($blib, 'bin', 'scripts', 'examples'));
plan tests => scalar @files;
foreach my $file (@files) {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Test-Without-Module-0.20/xt/meta-lint.t
new/Test-Without-Module-0.21/xt/meta-lint.t
--- old/Test-Without-Module-0.20/xt/meta-lint.t 2017-04-09 17:49:58.000000000
+0200
+++ new/Test-Without-Module-0.21/xt/meta-lint.t 2017-07-20 22:06:10.000000000
+0200
@@ -6,7 +6,7 @@
use warnings;
use strict;
use File::Find;
-use Test::More;
+use Test::More tests => 4;
use Parse::CPAN::Meta;
use CPAN::Meta::Validator;
@@ -34,5 +34,3 @@
# Also check that the declared version matches the version in META.*
is $meta->{version}, $version, "$meta_file version matches module version
($version)";
};
-
-done_testing;
\ No newline at end of file
