Hello community, here is the log from the commit of package perl-PAR for openSUSE:Factory checked in at 2016-09-25 14:44:36 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-PAR (Old) and /work/SRC/openSUSE:Factory/.perl-PAR.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-PAR" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-PAR/perl-PAR.changes 2015-08-02 22:46:22.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-PAR.new/perl-PAR.changes 2016-09-25 14:44:43.000000000 +0200 @@ -1,0 +2,18 @@ +Mon Sep 19 05:46:25 UTC 2016 - [email protected] + +- updated to 1.011 + see /usr/share/doc/packages/perl-PAR/Changes + + 1.011 2016-09-18 + + - Move to GitHub. Thanks, OpenFoundry, for years of service. + + - Suppress warning "Use of uninitialized value in do "file" ..." + + - Put a description of its purpose into the canary file + + - Remove all traces of Internals::PAR::CLEARSTACK + + - Remove all references to http://par.perl.org/, doesn't exist anymore + +------------------------------------------------------------------- Old: ---- PAR-1.010.tar.gz New: ---- PAR-1.011.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-PAR.spec ++++++ --- /var/tmp/diff_new_pack.gpIxcm/_old 2016-09-25 14:44:44.000000000 +0200 +++ /var/tmp/diff_new_pack.gpIxcm/_new 2016-09-25 14:44:44.000000000 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-PAR # -# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany. +# 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 @@ -17,7 +17,7 @@ Name: perl-PAR -Version: 1.010 +Version: 1.011 Release: 0 %define cpan_name PAR Summary: Perl Archive Toolkit @@ -65,10 +65,9 @@ For convenience, you can set the 'PERL5OPT' environment variable to '-MPAR' to enable 'PAR' processing globally (the overhead is small if not used); setting it to '-MPAR=/path/to/mylib.par' will load a specific PAR file. -Alternatively, consider using the _par.pl_ utility bundled with the the -PAR::Packer manpage distribution, or using the self-contained _parl_ -utility which is also distributed with the PAR::Packer manpage on machines -without PAR.pm installed. +Alternatively, consider using the _par.pl_ utility bundled with the +PAR::Packer distribution, or using the self-contained _parl_ utility which +is also distributed with PAR::Packer on machines without PAR.pm installed. Note that self-containing scripts and executables created with _par.pl_ and _pp_ may also be used as _.par_ archives: @@ -77,7 +76,7 @@ % perl -MPAR=packed.exe other.pl # this also works % perl -MPAR -Ipacked.exe other.pl # ditto -Please see the /SYNOPSIS manpage for most typical use cases. +Please see SYNOPSIS for most typical use cases. %prep %setup -q -n %{cpan_name}-%{version} @@ -96,6 +95,6 @@ %files -f %{name}.files %defattr(-,root,root,755) -%doc AUTHORS Changes README TODO +%doc AUTHORS Changes LICENSE README %changelog ++++++ PAR-1.010.tar.gz -> PAR-1.011.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/Changes new/PAR-1.011/Changes --- old/PAR-1.010/Changes 2015-07-13 12:50:07.000000000 +0200 +++ new/PAR-1.011/Changes 2016-09-18 13:17:20.000000000 +0200 @@ -1,3 +1,16 @@ +1.011 2016-09-18 + +- Move to GitHub. Thanks, OpenFoundry, for years of service. + +- Suppress warning "Use of uninitialized value in do "file" ..." + +- Put a description of its purpose into the canary file + +- Remove all traces of Internals::PAR::CLEARSTACK + +- Remove all references to http://par.perl.org/, doesn't exist anymore + + 1.010 2015-07-13 - Fix #101800 "[PATCH] Reinstate files to inc dir if deleted by external process" diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/LICENSE new/PAR-1.011/LICENSE --- old/PAR-1.010/LICENSE 1970-01-01 01:00:00.000000000 +0100 +++ new/PAR-1.011/LICENSE 2016-09-18 13:00:22.000000000 +0200 @@ -0,0 +1,201 @@ + The Artistic License 2.0 + + Copyright (c) 2000-2006, The Perl Foundation. + + Everyone is permitted to copy and distribute verbatim copies + of this license document, but changing it is not allowed. + +Preamble + +This license establishes the terms under which a given free software +Package may be copied, modified, distributed, and/or redistributed. +The intent is that the Copyright Holder maintains some artistic +control over the development of that Package while still keeping the +Package available as open source and free software. + +You are always permitted to make arrangements wholly outside of this +license directly with the Copyright Holder of a given Package. If the +terms of this license do not permit the full use that you propose to +make of the Package, you should contact the Copyright Holder and seek +a different licensing arrangement. + +Definitions + + "Copyright Holder" means the individual(s) or organization(s) + named in the copyright notice for the entire Package. + + "Contributor" means any party that has contributed code or other + material to the Package, in accordance with the Copyright Holder's + procedures. + + "You" and "your" means any person who would like to copy, + distribute, or modify the Package. + + "Package" means the collection of files distributed by the + Copyright Holder, and derivatives of that collection and/or of + those files. A given Package may consist of either the Standard + Version, or a Modified Version. + + "Distribute" means providing a copy of the Package or making it + accessible to anyone else, or in the case of a company or + organization, to others outside of your company or organization. + + "Distributor Fee" means any fee that you charge for Distributing + this Package or providing support for this Package to another + party. It does not mean licensing fees. + + "Standard Version" refers to the Package if it has not been + modified, or has been modified only in ways explicitly requested + by the Copyright Holder. + + "Modified Version" means the Package, if it has been changed, and + such changes were not explicitly requested by the Copyright + Holder. + + "Original License" means this Artistic License as Distributed with + the Standard Version of the Package, in its current version or as + it may be modified by The Perl Foundation in the future. + + "Source" form means the source code, documentation source, and + configuration files for the Package. + + "Compiled" form means the compiled bytecode, object code, binary, + or any other form resulting from mechanical transformation or + translation of the Source form. + + +Permission for Use and Modification Without Distribution + +(1) You are permitted to use the Standard Version and create and use +Modified Versions for any purpose without restriction, provided that +you do not Distribute the Modified Version. + + +Permissions for Redistribution of the Standard Version + +(2) You may Distribute verbatim copies of the Source form of the +Standard Version of this Package in any medium without restriction, +either gratis or for a Distributor Fee, provided that you duplicate +all of the original copyright notices and associated disclaimers. At +your discretion, such verbatim copies may or may not include a +Compiled form of the Package. + +(3) You may apply any bug fixes, portability changes, and other +modifications made available from the Copyright Holder. The resulting +Package will still be considered the Standard Version, and as such +will be subject to the Original License. + + +Distribution of Modified Versions of the Package as Source + +(4) You may Distribute your Modified Version as Source (either gratis +or for a Distributor Fee, and with or without a Compiled form of the +Modified Version) provided that you clearly document how it differs +from the Standard Version, including, but not limited to, documenting +any non-standard features, executables, or modules, and provided that +you do at least ONE of the following: + + (a) make the Modified Version available to the Copyright Holder + of the Standard Version, under the Original License, so that the + Copyright Holder may include your modifications in the Standard + Version. + + (b) ensure that installation of your Modified Version does not + prevent the user installing or running the Standard Version. In + addition, the Modified Version must bear a name that is different + from the name of the Standard Version. + + (c) allow anyone who receives a copy of the Modified Version to + make the Source form of the Modified Version available to others + under + + (i) the Original License or + + (ii) a license that permits the licensee to freely copy, + modify and redistribute the Modified Version using the same + licensing terms that apply to the copy that the licensee + received, and requires that the Source form of the Modified + Version, and of any works derived from it, be made freely + available in that license fees are prohibited but Distributor + Fees are allowed. + + +Distribution of Compiled Forms of the Standard Version +or Modified Versions without the Source + +(5) You may Distribute Compiled forms of the Standard Version without +the Source, provided that you include complete instructions on how to +get the Source of the Standard Version. Such instructions must be +valid at the time of your distribution. If these instructions, at any +time while you are carrying out such distribution, become invalid, you +must provide new instructions on demand or cease further distribution. +If you provide valid instructions or cease distribution within thirty +days after you become aware that the instructions are invalid, then +you do not forfeit any of your rights under this license. + +(6) You may Distribute a Modified Version in Compiled form without +the Source, provided that you comply with Section 4 with respect to +the Source of the Modified Version. + + +Aggregating or Linking the Package + +(7) You may aggregate the Package (either the Standard Version or +Modified Version) with other packages and Distribute the resulting +aggregation provided that you do not charge a licensing fee for the +Package. Distributor Fees are permitted, and licensing fees for other +components in the aggregation are permitted. The terms of this license +apply to the use and Distribution of the Standard or Modified Versions +as included in the aggregation. + +(8) You are permitted to link Modified and Standard Versions with +other works, to embed the Package in a larger work of your own, or to +build stand-alone binary or bytecode versions of applications that +include the Package, and Distribute the result without restriction, +provided the result does not expose a direct interface to the Package. + + +Items That are Not Considered Part of a Modified Version + +(9) Works (including, but not limited to, modules and scripts) that +merely extend or make use of the Package, do not, by themselves, cause +the Package to be a Modified Version. In addition, such works are not +considered parts of the Package itself, and are not subject to the +terms of this license. + + +General Provisions + +(10) Any use, modification, and distribution of the Standard or +Modified Versions is governed by this Artistic License. By using, +modifying or distributing the Package, you accept this license. Do not +use, modify, or distribute the Package, if you do not accept this +license. + +(11) If your Modified Version has been derived from a Modified +Version made by someone other than you, you are nevertheless required +to ensure that your Modified Version complies with the requirements of +this license. + +(12) This license does not grant you the right to use any trademark, +service mark, tradename, or logo of the Copyright Holder. + +(13) This license includes the non-exclusive, worldwide, +free-of-charge patent license to make, have made, use, offer to sell, +sell, import and otherwise transfer the Package with respect to any +patent claims licensable by the Copyright Holder that are necessarily +infringed by the Package. If you institute patent litigation +(including a cross-claim or counterclaim) against any party alleging +that the Package constitutes direct or contributory patent +infringement, then this Artistic License to you shall terminate on the +date that such litigation is filed. + +(14) Disclaimer of Warranty: +THE PACKAGE IS PROVIDED BY THE COPYRIGHT HOLDER AND CONTRIBUTORS "AS +IS' AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES. THE IMPLIED +WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR +NON-INFRINGEMENT ARE DISCLAIMED TO THE EXTENT PERMITTED BY YOUR LOCAL +LAW. UNLESS REQUIRED BY LAW, NO COPYRIGHT HOLDER OR CONTRIBUTOR WILL +BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL +DAMAGES ARISING IN ANY WAY OUT OF THE USE OF THE PACKAGE, EVEN IF +ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/MANIFEST new/PAR-1.011/MANIFEST --- old/PAR-1.010/MANIFEST 2015-01-24 15:09:47.000000000 +0100 +++ new/PAR-1.011/MANIFEST 2016-09-18 13:26:20.000000000 +0200 @@ -15,6 +15,7 @@ lib/PAR/SetupProgname.pm lib/PAR/SetupTemp.pm lib/PAR/Tutorial.pod +LICENSE Makefile.PL MANIFEST This list of files MANIFEST.SKIP @@ -27,4 +28,3 @@ t/60-cleanup.t t/hello.par t/Hello.pm -TODO diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/MANIFEST.SKIP new/PAR-1.011/MANIFEST.SKIP --- old/PAR-1.010/MANIFEST.SKIP 2012-01-06 15:12:38.000000000 +0100 +++ new/PAR-1.011/MANIFEST.SKIP 2016-09-18 13:26:17.000000000 +0200 @@ -6,5 +6,7 @@ ^blib/ ^pm_to_blib ^blibdirs +\B\.git\b +^\.gitignore \B\.svn\b ^MYMETA\. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/META.yml new/PAR-1.011/META.yml --- old/PAR-1.010/META.yml 2015-07-13 12:50:58.000000000 +0200 +++ new/PAR-1.011/META.yml 2016-09-18 13:29:53.000000000 +0200 @@ -21,7 +21,7 @@ provides: PAR: file: lib/PAR.pm - version: '1.010' + version: '1.011' PAR::Heavy: file: lib/PAR/Heavy.pm version: '0.12' @@ -42,5 +42,5 @@ perl: 5.8.1 resources: license: http://dev.perl.org/licenses/ - repository: https://www.openfoundry.org/svn/par/trunk -version: '1.010' + repository: https://github.com/rschupp/PAR +version: '1.011' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/Makefile.PL new/PAR-1.011/Makefile.PL --- old/PAR-1.010/Makefile.PL 2015-05-21 09:14:53.000000000 +0200 +++ new/PAR-1.011/Makefile.PL 2016-09-18 13:08:01.000000000 +0200 @@ -6,7 +6,7 @@ name 'PAR'; abstract 'Perl Archive Tookit'; all_from 'lib/PAR.pm'; -repository 'https://www.openfoundry.org/svn/par/trunk'; +repository 'https://github.com/rschupp/PAR'; perl_version '5.008001'; requires 'File::Temp' => 0.05; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/README new/PAR-1.011/README --- old/PAR-1.010/README 2012-01-06 15:12:38.000000000 +0100 +++ new/PAR-1.011/README 2016-09-18 13:07:38.000000000 +0200 @@ -4,13 +4,6 @@ Please type "perldoc PAR" after installation to see the module usage information, and "perldoc PAR::FAQ" for frequently answered questions. -With version 0.97 of PAR, the logic for generating stand-alone executables -has been refactored into the PAR-Packer distribution. It should be available -from the same source you got PAR from. Hence, for packing scripts with -prerequisite modules into stand-alone scripts or executables -(aka PerlApp, Perl2exe, or 'perlcc that works'), see "perldoc pp" -and "perldoc tkpp". - For running ".par" files directly, please install PAR-Packer and see "perldoc parl". @@ -25,50 +18,33 @@ PAR uses the standard perl module install process: - cpansign -v # optional; see SIGNATURE for details perl Makefile.PL - make # or 'nmake' on Win32 + make make test make install +* Historic note + +With version 0.97 of PAR, the logic for generating stand-alone executables +has been refactored into the PAR-Packer distribution. It should be available +from the same source you got PAR from. Hence, for packing scripts with +prerequisite modules into stand-alone scripts or executables +(aka PerlApp, Perl2exe, or 'perlcc that works'), see "perldoc pp" +and "perldoc tkpp". + Since version 0.97 of PAR, you do not need a C compiler any more to build it. All logic that required a C compiler previously was moved into the PAR-Packer distribution. -* Notes for Windows users - -If you are using Microsoft Windows, you will probably need the 'nmake' -utility before installation. It's available at: - - http://download.microsoft.com/download/vc15/Patch/1.52/W95/EN-US/nmake15.exe - -If you are connected to the internet, "perl Makefile.PL" is capable -of automatically fetch it, and install into your Perl/bin directory. -You will see a message like this: - - The required 'nmake' executable not found, fetching it... - -However, if you are not yet online, or wish to install 'nmake' into -another directory, then please download the file manually, save it to -a directory in %PATH (e.g. C:\WINDOWS\COMMAND), then launch the MS-DOS -command line shell, "cd" to that directory, and run "nmake15.exe" from -there; that will create the 'nmake.exe' file. - -You may then resume the installation process above, but replace 'make' -with 'nmake' in the last three lines. - * Source Repository -You can check out the most recent revision from PAR's Subversion repository: - - http://svn.openfoundry.org/par/trunk/ +You can check out the most recent revision from PAR's GitHub repository: -There is anonymous access to all. Commit access is handed out liberally; -contact the mailing list for details. + https://github.com/rschupp/PAR * Contact -<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at <[email protected]>, or send an empty mail to <[email protected]> to participate in the discussion. @@ -83,4 +59,4 @@ All rights reserved. You can redistribute and/or modify this bundle under the same terms as Perl itself. -See <http://www.perl.com/perl/misc/Artistic.html>. +See <http://dev.perl.org/licenses/artistic.html>. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/TODO new/PAR-1.011/TODO --- old/PAR-1.010/TODO 2012-01-06 15:12:38.000000000 +0100 +++ new/PAR-1.011/TODO 1970-01-01 01:00:00.000000000 +0100 @@ -1,5 +0,0 @@ -The official PAR TODO list can be found in the PAR wiki at -http://par.perl.org/?DevelopmentInProgress - -It supersedes this document which is left in the distribution -for reference only. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR/Environment.pod new/PAR-1.011/lib/PAR/Environment.pod --- old/PAR-1.010/lib/PAR/Environment.pod 2011-12-28 12:22:50.000000000 +0100 +++ new/PAR-1.011/lib/PAR/Environment.pod 2016-09-18 12:45:01.000000000 +0200 @@ -216,10 +216,7 @@ =head1 SEE ALSO -The PAR homepage at L<http://par.perl.org>. - -L<PAR>, L<PAR::Tutorial>, L<PAR::FAQ> (For a more current FAQ, -refer to the homepage.) +L<PAR>, L<PAR::Tutorial>, L<PAR::FAQ> L<par.pl>, L<parl>, L<pp> @@ -229,7 +226,7 @@ Steffen Mueller E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR/FAQ.pod new/PAR-1.011/lib/PAR/FAQ.pod --- old/PAR-1.010/lib/PAR/FAQ.pod 2015-01-24 13:35:23.000000000 +0100 +++ new/PAR-1.011/lib/PAR/FAQ.pod 2016-09-18 12:45:01.000000000 +0200 @@ -7,7 +7,6 @@ =head1 SYNOPSIS This is the Frequently Asked Questions list for the Perl Archive Toolkit. -You can edit this document at L<http://par.perl.org/wiki/FAQ> online. This (included) FAQ list might be outdated. The Wiki version at the above URL is guaranteed to be up to date. @@ -100,7 +99,7 @@ I<Note:> Is this still a problem? -Comment out the line that starts with " unless (caller) ", and compile it again. Note that this is considered a bug; clearing the caller stack is a development in progress. See: L<http://par.perl.org/wiki/Development_in_progress> +Comment out the line that starts with " unless (caller) ", and compile it again. Note that this is considered a bug; clearing the caller stack is a development in progress. =head2 I get a link error '/usr/bin/ld: cannot find -lperl' during the 'make' step of the installation on Debian. What's wrong? @@ -348,7 +347,7 @@ Audrey Tang E<lt>[email protected]<gt>, Steffen Mueller E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR/Heavy.pm new/PAR-1.011/lib/PAR/Heavy.pm --- old/PAR-1.010/lib/PAR/Heavy.pm 2015-01-24 14:14:31.000000000 +0100 +++ new/PAR-1.011/lib/PAR/Heavy.pm 2016-09-18 12:45:01.000000000 +0200 @@ -174,7 +174,7 @@ Audrey Tang E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR/SetupProgname.pm new/PAR-1.011/lib/PAR/SetupProgname.pm --- old/PAR-1.010/lib/PAR/SetupProgname.pm 2011-12-28 12:22:50.000000000 +0100 +++ new/PAR-1.011/lib/PAR/SetupProgname.pm 2016-09-18 12:45:01.000000000 +0200 @@ -62,8 +62,6 @@ =head1 SEE ALSO -The PAR homepage at L<http://par.perl.org>. - L<PAR>, L<PAR::Environment> =head1 AUTHORS @@ -71,7 +69,7 @@ Audrey Tang E<lt>[email protected]<gt>, Steffen Mueller E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR/SetupTemp.pm new/PAR-1.011/lib/PAR/SetupTemp.pm --- old/PAR-1.010/lib/PAR/SetupTemp.pm 2015-07-03 18:49:43.000000000 +0200 +++ new/PAR-1.011/lib/PAR/SetupTemp.pm 2016-09-18 12:45:01.000000000 +0200 @@ -159,8 +159,6 @@ =head1 SEE ALSO -The PAR homepage at L<http://par.perl.org>. - L<PAR>, L<PAR::Environment> =head1 AUTHORS @@ -168,7 +166,7 @@ Audrey Tang E<lt>[email protected]<gt>, Steffen Mueller E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR/Tutorial.pod new/PAR-1.011/lib/PAR/Tutorial.pod --- old/PAR-1.010/lib/PAR/Tutorial.pod 2011-12-28 12:22:50.000000000 +0100 +++ new/PAR-1.011/lib/PAR/Tutorial.pod 2016-09-18 12:45:01.000000000 +0200 @@ -1098,7 +1098,7 @@ Audrey Tang E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/PAR-1.010/lib/PAR.pm new/PAR-1.011/lib/PAR.pm --- old/PAR-1.010/lib/PAR.pm 2015-07-12 02:03:42.000000000 +0200 +++ new/PAR-1.011/lib/PAR.pm 2016-09-18 12:45:01.000000000 +0200 @@ -1,5 +1,5 @@ package PAR; -$PAR::VERSION = '1.010'; +$PAR::VERSION = '1.011'; use 5.006; use strict; @@ -595,13 +595,12 @@ sub _run_member_from_par { my $member = shift; - my $clear_stack = shift; my ($fh, $is_new, $filename) = _tempfile($member->crc32String . ".pl"); if ($is_new) { my $file = $member->fileName; - print $fh "package main;\n"; - print $fh "#line 1 \"$file\"\n"; + print $fh "package main;\n", + "#line 1 \"$file\"\n"; $member->extractToFileHandle($fh); seek ($fh, 0, 0); } @@ -616,21 +615,25 @@ sub _run_member { my $member = shift; - my $clear_stack = shift; my ($fh, $is_new, $filename) = _tempfile($member->crc32String . ".pl"); if ($is_new) { my $file = $member->fileName; - print $fh "package main;\n"; - if (defined &Internals::PAR::CLEARSTACK and $clear_stack) { - print $fh "Internals::PAR::CLEARSTACK();\n"; - } - print $fh "#line 1 \"$file\"\n"; + print $fh "package main;\n", + "#line 1 \"$file\"\n"; $member->extractToFileHandle($fh); seek ($fh, 0, 0); } - unshift @INC, sub { shift @INC; return $fh }; + # NOTE: Perl 5.14.x will print the infamous warning + # "Use of uninitialized value in do "file" at .../PAR.pm line 636" + # when $INC{main} exists, but is undef, when "do 'main'" is called. + # This typically happens at the second invocation of _run_member() + # when running a packed executable (the first invocation is for the + # generated script/main.pl, the second for the packed script itself). + # Hence shut the warning up by assigning something to $INC{main}. + # 5.14.x is the only Perl version since 5.8.1 that shows this behaviour. + unshift @INC, sub { shift @INC; $INC{$_[1]} = $filename; return $fh }; $ENV{PAR_0} = $filename; # for Pod::Usage { do 'main'; @@ -642,17 +645,12 @@ sub _run_external_file { my $filename = shift; - my $clear_stack = shift; - require 5.008; open my $ffh, '<', $filename or die "Can't open perl script \"$filename\": $!"; - my $clearstack = ''; - if (defined &Internals::PAR::CLEARSTACK and $clear_stack) { - $clear_stack = "Internals::PAR::CLEARSTACK();\n"; - } - my $string = "package main;\n$clearstack#line 1 \"$filename\"\n" - . do { local $/ = undef; <$ffh> }; + my $string = "package main;\n" . + "#line 1 \"$filename\"\n" . + do { local $/ = undef; <$ffh> }; close $ffh; open my $fh, '<', \$string @@ -733,6 +731,11 @@ # touch (and back-date) canary file open my $fh, ">", $canary; + print $fh <<'...'; +This file is used as "canary in the coal mine" to detect when +files in PAR's cache area are being removed by some clean up +mechanism (probably based on file modification times). +... close $fh; my $dateback = time() - $PAR::SetupTemp::CanaryDateBack; utime($dateback, $dateback, $canary); @@ -1183,10 +1186,7 @@ =head1 SEE ALSO -The PAR homepage at L<http://par.perl.org>. - -L<PAR::Tutorial>, L<PAR::FAQ> (For a more -current FAQ, refer to the homepage.) +L<PAR::Tutorial>, L<PAR::FAQ> The L<PAR::Packer> distribution which contains the packaging utilities: L<par.pl>, L<parl>, L<pp>. @@ -1230,7 +1230,7 @@ Steffen Mueller E<lt>[email protected]<gt> -L<http://par.perl.org/> is the official PAR website. You can write +You can write to the mailing list at E<lt>[email protected]<gt>, or send an empty mail to E<lt>[email protected]<gt> to participate in the discussion.
