Date: Tuesday, November 23, 2021 @ 02:18:54
Author: grawlinson
Revision: 1054415
archrelease: copy trunk to community-any
Added:
parallel/repos/community-any/0001-Remove-citation-things.patch
(from rev 1054414, parallel/trunk/0001-Remove-citation-things.patch)
parallel/repos/community-any/0002-Remove-GNU-branding.patch
(from rev 1054414, parallel/trunk/0002-Remove-GNU-branding.patch)
parallel/repos/community-any/PKGBUILD
(from rev 1054414, parallel/trunk/PKGBUILD)
Deleted:
parallel/repos/community-any/0001-Remove-citation-things.patch
parallel/repos/community-any/0002-Remove-GNU-branding.patch
parallel/repos/community-any/PKGBUILD
-----------------------------------+
0001-Remove-citation-things.patch | 590 ++++++++++++++++++------------------
0002-Remove-GNU-branding.patch | 526 ++++++++++++++++----------------
PKGBUILD | 90 ++---
3 files changed, 603 insertions(+), 603 deletions(-)
Deleted: 0001-Remove-citation-things.patch
===================================================================
--- 0001-Remove-citation-things.patch 2021-11-23 02:17:55 UTC (rev 1054414)
+++ 0001-Remove-citation-things.patch 2021-11-23 02:18:54 UTC (rev 1054415)
@@ -1,295 +0,0 @@
---- a/src/parallel
-+++ b/src/parallel
-@@ -1624,11 +1624,6 @@ sub options_hash() {
- "gnu" => \$opt::gnu,
- "link|xapply" => \$opt::link,
- "linkinputsource|xapplyinputsource=i" => \@opt::linkinputsource,
-- # Before changing these lines, please read
-- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice
-- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
-- # You accept to be put in a public hall of shame by removing
-- # the lines.
- "bibtex|citation" => \$opt::citation,
- "wc|willcite|will-cite|nn|nonotice|no-notice" => \$opt::willcite,
- # Termination and retries
-@@ -1783,15 +1778,6 @@ sub parse_options(@) {
- my @argv_before = @ARGV;
- @ARGV = read_options();
-
-- # Before changing these line, please read
-- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice
-- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
-- # You accept to be added to a public hall of shame by
-- # removing the lines.
-- if(defined $opt::citation) {
-- citation(\@argv_before,\@ARGV);
-- wait_and_exit(0);
-- }
- # no-* overrides *
- if($opt::nokeeporder) { $opt::keeporder = undef; }
-
-@@ -2072,81 +2058,6 @@ sub parse_options(@) {
- if(defined $opt::eta) { $opt::progress = $opt::eta; }
- if(defined $opt::bar) { $opt::progress = $opt::bar; }
-
-- # Funding a free software project is hard. GNU Parallel is no
-- # exception. On top of that it seems the less visible a project
-- # is, the harder it is to get funding. And the nature of GNU
-- # Parallel is that it will never be seen by "the guy with the
-- # checkbook", but only by the people doing the actual work.
-- #
-- # This problem has been covered by others - though no solution has
-- # been found:
-- # https://www.slideshare.net/NadiaEghbal/consider-the-maintainer
-- # https://blog.licensezero.com/2019/08/24/process-of-elimination.html
-- # https://www.numfocus.org/blog/why-is-numpy-only-now-getting-funded/
-- #
-- # The FAQ tells you why the citation notice exists:
-- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
-- #
-- # If you want GNU Parallel to be maintained in the future, and not
-- # just wither away like so many other free software tools, you
-- # need to help finance the development.
-- #
-- # The citation notice is a simple way of doing so, as citations
-- # makes it possible to me to get a job where I can maintain GNU
-- # Parallel as part of the job.
-- #
-- # This means you can help financing development
-- #
-- # WITHOUT PAYING A SINGLE CENT!
-- #
-- # Before implementing the citation notice it was discussed with
-- # the users:
-- # https://lists.gnu.org/archive/html/parallel/2013-11/msg00006.html
-- #
-- # Having to spend 10 seconds on running 'parallel --citation' once
-- # is no doubt not an ideal solution, but no one has so far come up
-- # with an ideal solution - neither for funding GNU Parallel nor
-- # other free software.
-- #
-- # If you believe you have the perfect solution, you should try it
-- # out, and if it works, you should post it on the email
-- # list. Ideas that will cost work and which have not been tested
-- # are, however, unlikely to be prioritized.
-- #
-- # Please note that GPL version 3 gives you the right to fork GNU
-- # Parallel under a new name, but it does not give you the right to
-- # distribute modified copies with the citation notice disabled in
-- # a way where the software can be confused with GNU Parallel. To
-- # do that you need to be the owner of the GNU Parallel
-- # trademark. The xt:Commerce case shows this.
-- #
-- # Description of the xt:Commerce case in OLG Duesseldorf
-- #
http://www.inta.org/INTABulletin/Pages/GERMANYGeneralPublicLicenseDoesNotPermitUseofThird-PartyTrademarksforAdvertisingModifiedVersionsofOpen-SourceSoftware.aspx
-- #
https://web.archive.org/web/20180715073746/http://www.inta.org/INTABulletin/Pages/GERMANYGeneralPublicLicenseDoesNotPermitUseofThird-PartyTrademarksforAdvertisingModifiedVersionsofOpen-SourceSoftware.aspx
-- #
-- # The verdict in German
-- #
https://www.admody.com/urteilsdatenbank/cafe6fdaeed3/OLG-Duesseldorf_Urteil_vom_28-September-2010_Az_I-20-U-41-09
-- #
https://web.archive.org/web/20180715073717/https://www.admody.com/urteilsdatenbank/cafe6fdaeed3/OLG-Duesseldorf_Urteil_vom_28-September-2010_Az_I-20-U-41-09
-- #
-- # Other free software limiting derivates by the same name:
-- #
https://en.wikipedia.org/wiki/Red_Hat_Enterprise_Linux_derivatives#Legal_aspects
-- # https://tm.joomla.org/trademark-faq.html
-- # https://www.mozilla.org/en-US/foundation/trademarks/faq/
-- #
-- # Running 'parallel --citation' one single time takes less than 10
-- # seconds, and will silence the citation notice for future
-- # runs. If that is too much trouble for you, why not use one of
-- # the alternatives instead?
-- # See a list in: 'man parallel_alternatives'
-- #
-- # If you want GNU Parallel to be maintained in the future you
-- # should keep this line.
-- citation_notice();
-- # _YOU_ will be harming free software by removing the notice. You
-- # accept to be added to a public hall of shame by removing the
-- # line. This is because _YOU_ actively make it harder to justify
-- # spending time developing GNU Parallel.
--
- parse_halt();
-
- if($ENV{'PARALLEL_ENV'}) {
-@@ -5071,83 +4982,9 @@ sub usage() {
- "",
- "GNU Parallel can do much more. See 'man $Global::progname' for
details",
- "",
-- "Academic tradition requires you to cite works you base your article
on.",
-- "If you use programs that use GNU Parallel to process data for an
article in a",
-- "scientific publication, please cite:",
-- "",
-- " Tange, O. (2021, October 22). GNU Parallel 20211022
('Sinclair').",
-- " Zenodo. https://doi.org/10.5281/zenodo.5593566";,
-- "",
-- # Before changing these lines, please read
-- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice
-- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
-- # You accept to be put in a public hall of shame by removing
-- # the lines.
-- "This helps funding further development; AND IT WON'T COST YOU A
CENT.",
-- "If you pay 10000 EUR you should feel free to use GNU Parallel without
citing.",
-- "",
- "",);
- }
-
--sub citation_notice() {
-- # if --will-cite or --plain: do nothing
-- # if stderr redirected: do nothing
-- # if $PARALLEL_HOME/will-cite: do nothing
-- # else: print citation notice to stderr
-- if($opt::willcite
-- or
-- $opt::plain
-- or
-- not -t $Global::original_stderr
-- or
-- grep { -e "$_/will-cite" } @Global::config_dirs) {
-- # skip
-- } else {
-- ::status
-- ("Academic tradition requires you to cite works you base your
article on.",
-- "If you use programs that use GNU Parallel to process data for an
article in a",
-- "scientific publication, please cite:",
-- "",
-- " Tange, O. (2021, October 22). GNU Parallel 20211022
('Sinclair').",
-- " Zenodo. https://doi.org/10.5281/zenodo.5593566";,
-- "",
-- # Before changing these line, please read
-- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice and
-- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
-- # You accept to be put in a public hall of shame by
-- # removing the lines.
-- "This helps funding further development; AND IT WON'T COST YOU A
CENT.",
-- "If you pay 10000 EUR you should feel free to use GNU Parallel
without citing.",
-- "",
-- "More about funding GNU Parallel and the citation notice:",
--
"https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice";,
-- "",
-- "To silence this citation notice: run 'parallel --citation' once.",
-- ""
-- );
-- mkdir $Global::config_dir;
-- # Number of times the user has run GNU Parallel without showing
-- # willingness to cite
-- my $runs = 0;
-- if(open (my $fh, "<", $Global::config_dir.
-- "/runs-without-willing-to-cite")) {
-- $runs = <$fh>;
-- close $fh;
-- }
-- $runs++;
-- if(open (my $fh, ">", $Global::config_dir.
-- "/runs-without-willing-to-cite")) {
-- print $fh $runs;
-- close $fh;
-- if($runs >= 10) {
-- ::status("Come on: You have run parallel $runs times. Isn't it
about time ",
-- "you run 'parallel --citation' once to silence the
citation notice?",
-- "");
-- }
-- }
-- }
--}
--
- sub status(@) {
- my @w = @_;
- my $fh = $Global::status_fd || *STDERR;
-@@ -5212,97 +5049,7 @@ sub version() {
- "This is free software: you are free to change and redistribute it.",
- "GNU $Global::progname comes with no warranty.",
- "",
-- "Web site: https://www.gnu.org/software/${Global::progname}\n";,
-- "When using programs that use GNU Parallel to process data for
publication",
-- "please cite as described in 'parallel --citation'.\n",
-- );
--}
--
--sub citation() {
-- # Returns: N/A
-- my ($all_argv_ref,$argv_options_removed_ref) = @_;
-- my $all_argv = "@$all_argv_ref";
-- my $no_opts = "@$argv_options_removed_ref";
-- $all_argv=~s/--citation//;
-- if($all_argv ne $no_opts) {
-- ::warning("--citation ignores all other options and arguments.");
-- ::status("");
-- }
--
-- ::status(
-- "Academic tradition requires you to cite works you base your article
on.",
-- "If you use programs that use GNU Parallel to process data for an
article in a",
-- "scientific publication, please cite:",
-- "",
-- "\@software{tange_2021_5593566,",
-- " author = {Tange, Ole},",
-- " title = {GNU Parallel 20211022 ('Sinclair')},",
-- " month = Oct,",
-- " year = 2021,",
-- " note = {{GNU Parallel is a general parallelizer to run",
-- " multiple serial command line programs in
parallel",
-- " without changing them.}},",
-- " publisher = {Zenodo},",
-- " doi = {10.5281/zenodo.5593566},",
-- " url = {https://doi.org/10.5281/zenodo.5593566}";,
-- "}",
-- "",
-- "(Feel free to use \\nocite{tange_2021_5593566})",
-- "",
-- # Before changing these lines, please read
-- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice and
-- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
-- # You accept to be put in a public hall of shame by removing
-- # the lines.
-- "This helps funding further development; AND IT WON'T COST YOU A CENT.",
-- "If you pay 10000 EUR you should feel free to use GNU Parallel without
citing.",
-- "",
-- "More about funding GNU Parallel and the citation notice:",
-- "https://lists.gnu.org/archive/html/parallel/2013-11/msg00006.html";,
--
"https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice";,
--
"https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt";,
-- "",
-- "If you send a copy of your published article to tange\@gnu.org, it
will be",
-- "mentioned in the release notes of next version of GNU Parallel.",
-- ""
- );
-- while(not grep { -e "$_/will-cite" } @Global::config_dirs) {
-- print "\nType: 'will cite' and press enter.\n> ";
-- my $input = <STDIN>;
-- if(not defined $input) {
-- exit(255);
-- }
-- if($input =~ /will cite/i) {
-- mkdir $Global::config_dir;
-- if(open (my $fh, ">", $Global::config_dir."/will-cite")) {
-- close $fh;
-- ::status(
-- "",
-- "Thank you for your support: You are the reason why there
is funding to",
-- "continue maintaining GNU Parallel. On behalf of future
versions of",
-- "GNU Parallel, which would not exist without your support:",
-- "",
-- " THANK YOU SO MUCH",
-- "",
-- "It is really appreciated. The citation notice is now
silenced.",
-- "");
-- } else {
-- ::status(
-- "",
-- "Thank you for your support. It is much appreciated. The
citation",
-- "cannot permanently be silenced. Use '--will-cite'
instead.",
-- "",
-- "If you use '--will-cite' in scripts to be run by others
you are making",
-- "it harder for others to see the citation notice. The
development of",
-- "GNU Parallel is indirectly financed through citations,
so if users",
-- "do not know they should cite then you are making it
harder to finance",
-- "development. However, if you pay 10000 EUR, you should
feel free to",
-- "use '--will-cite' in scripts.",
-- "");
-- last;
-- }
-- }
-- }
- }
-
- sub show_limits() {
-
Copied: parallel/repos/community-any/0001-Remove-citation-things.patch (from
rev 1054414, parallel/trunk/0001-Remove-citation-things.patch)
===================================================================
--- 0001-Remove-citation-things.patch (rev 0)
+++ 0001-Remove-citation-things.patch 2021-11-23 02:18:54 UTC (rev 1054415)
@@ -0,0 +1,295 @@
+--- a/src/parallel
++++ b/src/parallel
+@@ -1624,11 +1624,6 @@ sub options_hash() {
+ "gnu" => \$opt::gnu,
+ "link|xapply" => \$opt::link,
+ "linkinputsource|xapplyinputsource=i" => \@opt::linkinputsource,
+- # Before changing these lines, please read
+- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice
+- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
+- # You accept to be put in a public hall of shame by removing
+- # the lines.
+ "bibtex|citation" => \$opt::citation,
+ "wc|willcite|will-cite|nn|nonotice|no-notice" => \$opt::willcite,
+ # Termination and retries
+@@ -1783,15 +1778,6 @@ sub parse_options(@) {
+ my @argv_before = @ARGV;
+ @ARGV = read_options();
+
+- # Before changing these line, please read
+- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice
+- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
+- # You accept to be added to a public hall of shame by
+- # removing the lines.
+- if(defined $opt::citation) {
+- citation(\@argv_before,\@ARGV);
+- wait_and_exit(0);
+- }
+ # no-* overrides *
+ if($opt::nokeeporder) { $opt::keeporder = undef; }
+
+@@ -2072,81 +2058,6 @@ sub parse_options(@) {
+ if(defined $opt::eta) { $opt::progress = $opt::eta; }
+ if(defined $opt::bar) { $opt::progress = $opt::bar; }
+
+- # Funding a free software project is hard. GNU Parallel is no
+- # exception. On top of that it seems the less visible a project
+- # is, the harder it is to get funding. And the nature of GNU
+- # Parallel is that it will never be seen by "the guy with the
+- # checkbook", but only by the people doing the actual work.
+- #
+- # This problem has been covered by others - though no solution has
+- # been found:
+- # https://www.slideshare.net/NadiaEghbal/consider-the-maintainer
+- # https://blog.licensezero.com/2019/08/24/process-of-elimination.html
+- # https://www.numfocus.org/blog/why-is-numpy-only-now-getting-funded/
+- #
+- # The FAQ tells you why the citation notice exists:
+- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
+- #
+- # If you want GNU Parallel to be maintained in the future, and not
+- # just wither away like so many other free software tools, you
+- # need to help finance the development.
+- #
+- # The citation notice is a simple way of doing so, as citations
+- # makes it possible to me to get a job where I can maintain GNU
+- # Parallel as part of the job.
+- #
+- # This means you can help financing development
+- #
+- # WITHOUT PAYING A SINGLE CENT!
+- #
+- # Before implementing the citation notice it was discussed with
+- # the users:
+- # https://lists.gnu.org/archive/html/parallel/2013-11/msg00006.html
+- #
+- # Having to spend 10 seconds on running 'parallel --citation' once
+- # is no doubt not an ideal solution, but no one has so far come up
+- # with an ideal solution - neither for funding GNU Parallel nor
+- # other free software.
+- #
+- # If you believe you have the perfect solution, you should try it
+- # out, and if it works, you should post it on the email
+- # list. Ideas that will cost work and which have not been tested
+- # are, however, unlikely to be prioritized.
+- #
+- # Please note that GPL version 3 gives you the right to fork GNU
+- # Parallel under a new name, but it does not give you the right to
+- # distribute modified copies with the citation notice disabled in
+- # a way where the software can be confused with GNU Parallel. To
+- # do that you need to be the owner of the GNU Parallel
+- # trademark. The xt:Commerce case shows this.
+- #
+- # Description of the xt:Commerce case in OLG Duesseldorf
+- #
http://www.inta.org/INTABulletin/Pages/GERMANYGeneralPublicLicenseDoesNotPermitUseofThird-PartyTrademarksforAdvertisingModifiedVersionsofOpen-SourceSoftware.aspx
+- #
https://web.archive.org/web/20180715073746/http://www.inta.org/INTABulletin/Pages/GERMANYGeneralPublicLicenseDoesNotPermitUseofThird-PartyTrademarksforAdvertisingModifiedVersionsofOpen-SourceSoftware.aspx
+- #
+- # The verdict in German
+- #
https://www.admody.com/urteilsdatenbank/cafe6fdaeed3/OLG-Duesseldorf_Urteil_vom_28-September-2010_Az_I-20-U-41-09
+- #
https://web.archive.org/web/20180715073717/https://www.admody.com/urteilsdatenbank/cafe6fdaeed3/OLG-Duesseldorf_Urteil_vom_28-September-2010_Az_I-20-U-41-09
+- #
+- # Other free software limiting derivates by the same name:
+- #
https://en.wikipedia.org/wiki/Red_Hat_Enterprise_Linux_derivatives#Legal_aspects
+- # https://tm.joomla.org/trademark-faq.html
+- # https://www.mozilla.org/en-US/foundation/trademarks/faq/
+- #
+- # Running 'parallel --citation' one single time takes less than 10
+- # seconds, and will silence the citation notice for future
+- # runs. If that is too much trouble for you, why not use one of
+- # the alternatives instead?
+- # See a list in: 'man parallel_alternatives'
+- #
+- # If you want GNU Parallel to be maintained in the future you
+- # should keep this line.
+- citation_notice();
+- # _YOU_ will be harming free software by removing the notice. You
+- # accept to be added to a public hall of shame by removing the
+- # line. This is because _YOU_ actively make it harder to justify
+- # spending time developing GNU Parallel.
+-
+ parse_halt();
+
+ if($ENV{'PARALLEL_ENV'}) {
+@@ -5073,83 +4984,9 @@ sub usage() {
+ "",
+ "GNU Parallel can do much more. See 'man $Global::progname' for
details",
+ "",
+- "Academic tradition requires you to cite works you base your article
on.",
+- "If you use programs that use GNU Parallel to process data for an
article in a",
+- "scientific publication, please cite:",
+- "",
+- " Tange, O. (2021, November 22). GNU Parallel 20211122 ('Peng
Shuai').",
+- " Zenodo. https://doi.org/10.5281/zenodo.5719513";,
+- "",
+- # Before changing these lines, please read
+- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice
+- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
+- # You accept to be put in a public hall of shame by removing
+- # the lines.
+- "This helps funding further development; AND IT WON'T COST YOU A
CENT.",
+- "If you pay 10000 EUR you should feel free to use GNU Parallel without
citing.",
+- "",
+ "",);
+ }
+
+-sub citation_notice() {
+- # if --will-cite or --plain: do nothing
+- # if stderr redirected: do nothing
+- # if $PARALLEL_HOME/will-cite: do nothing
+- # else: print citation notice to stderr
+- if($opt::willcite
+- or
+- $opt::plain
+- or
+- not -t $Global::original_stderr
+- or
+- grep { -e "$_/will-cite" } @Global::config_dirs) {
+- # skip
+- } else {
+- ::status
+- ("Academic tradition requires you to cite works you base your
article on.",
+- "If you use programs that use GNU Parallel to process data for an
article in a",
+- "scientific publication, please cite:",
+- "",
+- " Tange, O. (2021, November 22). GNU Parallel 20211122 ('Peng
Shuai').",
+- " Zenodo. https://doi.org/10.5281/zenodo.5719513";,
+- "",
+- # Before changing these line, please read
+- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice and
+- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
+- # You accept to be put in a public hall of shame by
+- # removing the lines.
+- "This helps funding further development; AND IT WON'T COST YOU A
CENT.",
+- "If you pay 10000 EUR you should feel free to use GNU Parallel
without citing.",
+- "",
+- "More about funding GNU Parallel and the citation notice:",
+-
"https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice";,
+- "",
+- "To silence this citation notice: run 'parallel --citation' once.",
+- ""
+- );
+- mkdir $Global::config_dir;
+- # Number of times the user has run GNU Parallel without showing
+- # willingness to cite
+- my $runs = 0;
+- if(open (my $fh, "<", $Global::config_dir.
+- "/runs-without-willing-to-cite")) {
+- $runs = <$fh>;
+- close $fh;
+- }
+- $runs++;
+- if(open (my $fh, ">", $Global::config_dir.
+- "/runs-without-willing-to-cite")) {
+- print $fh $runs;
+- close $fh;
+- if($runs >= 10) {
+- ::status("Come on: You have run parallel $runs times. Isn't it
about time ",
+- "you run 'parallel --citation' once to silence the
citation notice?",
+- "");
+- }
+- }
+- }
+-}
+-
+ sub status(@) {
+ my @w = @_;
+ my $fh = $Global::status_fd || *STDERR;
+@@ -5214,97 +5051,7 @@ sub version() {
+ "This is free software: you are free to change and redistribute it.",
+ "GNU $Global::progname comes with no warranty.",
+ "",
+- "Web site: https://www.gnu.org/software/${Global::progname}\n";,
+- "When using programs that use GNU Parallel to process data for
publication",
+- "please cite as described in 'parallel --citation'.\n",
+- );
+-}
+-
+-sub citation() {
+- # Returns: N/A
+- my ($all_argv_ref,$argv_options_removed_ref) = @_;
+- my $all_argv = "@$all_argv_ref";
+- my $no_opts = "@$argv_options_removed_ref";
+- $all_argv=~s/--citation//;
+- if($all_argv ne $no_opts) {
+- ::warning("--citation ignores all other options and arguments.");
+- ::status("");
+- }
+-
+- ::status(
+- "Academic tradition requires you to cite works you base your article
on.",
+- "If you use programs that use GNU Parallel to process data for an
article in a",
+- "scientific publication, please cite:",
+- "",
+- "\@software{tange_2021_5719513,",
+- " author = {Tange, Ole},",
+- " title = {GNU Parallel 20211122 ('Peng Shuai')},",
+- " month = Nov,",
+- " year = 2021,",
+- " note = {{GNU Parallel is a general parallelizer to run",
+- " multiple serial command line programs in
parallel",
+- " without changing them.}},",
+- " publisher = {Zenodo},",
+- " doi = {10.5281/zenodo.5719513},",
+- " url = {https://doi.org/10.5281/zenodo.5719513}";,
+- "}",
+- "",
+- "(Feel free to use \\nocite{tange_2021_5719513})",
+- "",
+- # Before changing these lines, please read
+- #
https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice and
+- #
https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt
+- # You accept to be put in a public hall of shame by removing
+- # the lines.
+- "This helps funding further development; AND IT WON'T COST YOU A CENT.",
+- "If you pay 10000 EUR you should feel free to use GNU Parallel without
citing.",
+- "",
+- "More about funding GNU Parallel and the citation notice:",
+- "https://lists.gnu.org/archive/html/parallel/2013-11/msg00006.html";,
+-
"https://www.gnu.org/software/parallel/parallel_design.html#Citation-notice";,
+-
"https://git.savannah.gnu.org/cgit/parallel.git/tree/doc/citation-notice-faq.txt";,
+- "",
+- "If you send a copy of your published article to tange\@gnu.org, it
will be",
+- "mentioned in the release notes of next version of GNU Parallel.",
+- ""
+ );
+- while(not grep { -e "$_/will-cite" } @Global::config_dirs) {
+- print "\nType: 'will cite' and press enter.\n> ";
+- my $input = <STDIN>;
+- if(not defined $input) {
+- exit(255);
+- }
+- if($input =~ /will cite/i) {
+- mkdir $Global::config_dir;
+- if(open (my $fh, ">", $Global::config_dir."/will-cite")) {
+- close $fh;
+- ::status(
+- "",
+- "Thank you for your support: You are the reason why there
is funding to",
+- "continue maintaining GNU Parallel. On behalf of future
versions of",
+- "GNU Parallel, which would not exist without your support:",
+- "",
+- " THANK YOU SO MUCH",
+- "",
+- "It is really appreciated. The citation notice is now
silenced.",
+- "");
+- } else {
+- ::status(
+- "",
+- "Thank you for your support. It is much appreciated. The
citation",
+- "cannot permanently be silenced. Use '--will-cite'
instead.",
+- "",
+- "If you use '--will-cite' in scripts to be run by others
you are making",
+- "it harder for others to see the citation notice. The
development of",
+- "GNU Parallel is indirectly financed through citations,
so if users",
+- "do not know they should cite then you are making it
harder to finance",
+- "development. However, if you pay 10000 EUR, you should
feel free to",
+- "use '--will-cite' in scripts.",
+- "");
+- last;
+- }
+- }
+- }
+ }
+
+ sub show_limits() {
+
Deleted: 0002-Remove-GNU-branding.patch
===================================================================
--- 0002-Remove-GNU-branding.patch 2021-11-23 02:17:55 UTC (rev 1054414)
+++ 0002-Remove-GNU-branding.patch 2021-11-23 02:18:54 UTC (rev 1054415)
@@ -1,263 +0,0 @@
---- a/src/parallel
-+++ b/src/parallel
-@@ -1750,7 +1750,7 @@ sub parse_parset() {
- ("@illegal is an invalid variable name.",
- "Variable names must be letter followed by letters or digits.",
- "Usage:",
-- " parset varname GNU Parallel options and command");
-+ " parset varname Parallel options and command");
- wait_and_exit(255);
- }
- if($var_or_assoc eq "assoc") {
-@@ -1839,7 +1839,7 @@ sub parse_options(@) {
- if(defined $opt::tmpdir) { $ENV{'TMPDIR'} = $opt::tmpdir; }
- $ENV{'PARALLEL_RSYNC_OPTS'} = $opt::rsync_opts ||
- $ENV{'PARALLEL_RSYNC_OPTS'} || '-rlDzR';
-- # Default: Same nice level as GNU Parallel is started at
-+ # Default: Same nice level as Parallel is started at
- $opt::nice ||= eval { getpriority(0,0) } || 0;
- if(defined $opt::help) { usage(); exit(0); }
- if(defined $opt::embed) { embed(); exit(0); }
-@@ -2177,7 +2177,7 @@ sub init_globals() {
- # Defaults:
- $Global::version = 20211022;
- $Global::progname = 'parallel';
-- $::name = "GNU Parallel";
-+ $::name = "Parallel";
- $Global::infinity = 2**31;
- $Global::debug = 0;
- $Global::verbose = 0;
-@@ -2424,7 +2424,7 @@ sub parse_replacement_string_options() {
- sub parse_semaphore() {
- # Semaphore defaults
- # Must be done before computing number of processes and max_line_length
-- # because when running as a semaphore GNU Parallel does not read args
-+ # because when running as a semaphore Parallel does not read args
- # Uses:
- # $opt::semaphore
- # $Global::semaphore
-@@ -3255,7 +3255,7 @@ sub __RUNNING_THE_JOBS_AND_PRINTING_PROGRESS__() {}
- # $Global::total_started = total number of jobs started
- # $Global::joblog = filehandle of joblog
- # $Global::debug = Is debugging on?
--# $Global::exitstatus = status code of GNU Parallel
-+# $Global::exitstatus = status code of Parallel
- # $Global::quoting = quote the command to run
-
- sub init_run_jobs() {
-@@ -4168,7 +4168,7 @@ sub setup_basefile() {
- }
- debug("init", "basesetup: @cmd\n");
- my ($exitstatus,$stdout_ref,$stderr_ref) =
-- run_gnu_parallel((join "\n",@cmd),"-j0","--retries",5);
-+ run_parallel((join "\n",@cmd),"-j0","--retries",5);
- if($exitstatus) {
- my @stdout = @$stdout_ref;
- my @stderr = @$stderr_ref;
-@@ -4198,7 +4198,7 @@ sub cleanup_basefile() {
- }
- debug("init", "basecleanup: @cmd\n");
- my ($exitstatus,$stdout_ref,$stderr_ref) =
-- run_gnu_parallel(join("\n",@cmd),"-j0","--retries",5);
-+ run_parallel(join("\n",@cmd),"-j0","--retries",5);
- if($exitstatus) {
- my @stdout = @$stdout_ref;
- my @stderr = @$stderr_ref;
-@@ -4207,22 +4207,22 @@ sub cleanup_basefile() {
- }
- }
-
--sub run_gnu_parallel() {
-+sub run_parallel() {
- my ($stdin,@args) = @_;
- my $cmd = join "",map { " $_ & " } split /\n/, $stdin;
- print $Global::original_stderr ` $cmd wait` ;
- return 0
- }
-
--sub _run_gnu_parallel() {
-- # Run GNU Parallel
-+sub _run_parallel() {
-+ # Run Parallel
- # This should ideally just fork an internal copy
- # and not start it through a shell
- # Input:
-- # $stdin = data to provide on stdin for GNU Parallel
-+ # $stdin = data to provide on stdin for Parallel
- # @args = command line arguments
- # Returns:
-- # $exitstatus = exitcode of GNU Parallel run
-+ # $exitstatus = exitcode of Parallel run
- # \@stdout = standard output
- # \@stderr = standard error
- my ($stdin,@args) = @_;
-@@ -4612,7 +4612,7 @@ sub onall($@) {
- );
- ::debug("init", "| $0 $options\n");
- open(my $parallel_fh, "|-", "$0 -0 --will-cite -j0 $options") ||
-- ::die_bug("This does not run GNU Parallel: $0 $options");
-+ ::die_bug("This does not run Parallel: $0 $options");
- my @joblogs;
- for my $host (sort keys %Global::host) {
- my $sshlogin = $Global::host{$host};
-@@ -4676,14 +4676,14 @@ sub sigpipe() {
-
- sub signal_children() {
- # Send signal to all children process groups
-- # and GNU Parallel itself
-+ # and Parallel itself
- # Uses:
- # %SIG
- # Returns: N/A
- my $signal = shift;
- debug("run", "Sending $signal ");
- kill $signal, map { -$_ } keys %Global::running;
-- # Use default signal handler for GNU Parallel itself
-+ # Use default signal handler for Parallel itself
- $SIG{$signal} = undef;
- kill $signal, $$;
- }
-@@ -4980,7 +4980,7 @@ sub usage() {
- "--recend str Record end separator for --pipe.",
- "--recstart str Record start separator for --pipe.",
- "",
-- "GNU Parallel can do much more. See 'man $Global::progname' for
details",
-+ "Parallel can do much more. See 'man $Global::progname' for details",
- "",
- "",);
- }
-@@ -5042,12 +5042,12 @@ sub version() {
- # Returns: N/A
- print join
- ("\n",
-- "GNU $Global::progname $Global::version",
-+ "$Global::progname $Global::version",
- "Copyright (C) 2007-2021 Ole Tange, http://ole.tange.dk and Free
Software",
- "Foundation, Inc.",
- "License GPLv3+: GNU GPL version 3 or later
<https://gnu.org/licenses/gpl.html>",
- "This is free software: you are free to change and redistribute it.",
-- "GNU $Global::progname comes with no warranty.",
-+ "$Global::progname comes with no warranty.",
- "",
- );
- }
-@@ -5063,7 +5063,7 @@ sub show_limits() {
- }
-
- sub embed() {
-- # Give an embeddable version of GNU Parallel
-+ # Give an embeddable version of Parallel
- # Tested with: bash, zsh, ksh, ash, dash, sh
- my $randomstring = "cut-here-".join"",
- map { (0..9,"a".."z","A".."Z")[rand(62)] } (1..20);
-@@ -5108,9 +5108,9 @@ sub embed() {
- ";
-
- print q!
--# Embedded GNU Parallel created with --embed
-+# Embedded Parallel created with --embed
- parallel() {
-- # Start GNU Parallel without leaving temporary files
-+ # Start Parallel without leaving temporary files
- #
- # Not all shells support 'perl <(cat ...)'
- # This is a complex way of doing:
-@@ -5121,7 +5121,7 @@ parallel() {
- # [1]+ Done cat
-
- # Make a temporary fifo that perl can read from
-- _fifo_with_GNU_Parallel_source=`perl -e 'use POSIX qw(mkfifo);
-+ _fifo_with_Parallel_source=`perl -e 'use POSIX qw(mkfifo);
- do {
- $f = "/tmp/parallel-".join"",
- map { (0..9,"a".."z","A".."Z")[rand(62)] } (1..5);
-@@ -5130,9 +5130,9 @@ parallel() {
- print $f;'`
- # Put source code into temporary file
- # so it is easy to copy to the fifo
-- _file_with_GNU_Parallel_source=`mktemp`;
-+ _file_with_Parallel_source=`mktemp`;
- !,
-- "cat <<'$randomstring' > \$_file_with_GNU_Parallel_source\n",
-+ "cat <<'$randomstring' > \$_file_with_Parallel_source\n",
- @source,
- $randomstring,"\n",
- q!
-@@ -5140,10 +5140,10 @@ parallel() {
- # and remove the file and fifo ASAP
- # 'sh -c' is needed to avoid
- # [1]+ Done cat
-- sh -c "(rm $_file_with_GNU_Parallel_source; cat
>$_fifo_with_GNU_Parallel_source; rm $_fifo_with_GNU_Parallel_source) <
$_file_with_GNU_Parallel_source &"
-+ sh -c "(rm $_file_with_Parallel_source; cat >$_fifo_with_Parallel_source;
rm $_fifo_with_Parallel_source) < $_file_with_Parallel_source &"
-
- # Read the source from the fifo
-- perl $_fifo_with_GNU_Parallel_source "$@"
-+ perl $_fifo_with_Parallel_source "$@"
- }
- !,
- @env_parallel_source,
-@@ -5155,7 +5155,7 @@ env_parallel --session
- env_parallel -k echo ::: Put your code here
- parset p,y,c,h -k echo ::: Put your code here
- echo $p $y $c $h
--echo You can also activate GNU Parallel for interactive use by:
-+echo You can also activate Parallel for interactive use by:
- echo . "$0"
- !;
- } else {
-@@ -6725,7 +6725,7 @@ sub loadavg($) {
- # Recompute a new one in the background
- # The load average is computed as the number of processes waiting for disk
- # or CPU right now. So it is the server load this instant and not
averaged over
-- # several minutes. This is needed so GNU Parallel will at most start one
job
-+ # several minutes. This is needed so Parallel will at most start one job
- # that will push the load over the limit.
- #
- # Returns:
-@@ -9052,8 +9052,8 @@ sub base64_zip_eval() {
- # Returns:
- # $script = 1-liner for perl -e
- my $script = ::spacefree(0,q{
-- @GNU_Parallel = split /_/, "use_IPC::Open3;_use_MIME::Base64";
-- eval"@GNU_Parallel";
-+ @Parallel = split /_/, "use_IPC::Open3;_use_MIME::Base64";
-+ eval"@Parallel";
- $chld = $SIG{CHLD};
- $SIG{CHLD} = "IGNORE";
- # Search for bzip2. Not found => use default path
-@@ -9105,13 +9105,13 @@ sub base64_eval($) {
- # Will be wrapped in ' so single quote is forbidden.
- # Spaces are stripped so spaces cannot be significant.
- # The funny 'use IPC::Open3'-syntax is to avoid spaces and
-- # to make it clear that this is a GNU Parallel command
-+ # to make it clear that this is a Parallel command
- # when looking at the process table.
- # Returns:
- # $script = 1-liner for perl -e
- my $script = ::spacefree(0,q{
-- @GNU_Parallel=("use","IPC::Open3;","use","MIME::Base64");
-- eval "@GNU_Parallel";
-+ @Parallel=("use","IPC::Open3;","use","MIME::Base64");
-+ eval "@Parallel";
- my $eval = decode_base64(join"",@ARGV);
- eval $eval;
- });
-@@ -10957,7 +10957,7 @@ sub slot($) {
- # To be safe assume all arguments are one-char
- # The max_len is cached between runs, but if the size of
- # the environment is different we need to recompute the
-- # usable max length for this run of GNU Parallel
-+ # usable max length for this run of Parallel
- # See https://unix.stackexchange.com/a/604943/2972
- if(not $darwin_max_len) {
- my $envc = (keys %ENV);
-@@ -12152,7 +12152,7 @@ sub get($) {
- my $ret = $self->{'arg_sub_queue'}->get();
- if($ret) {
- if(grep { index($_->orig(),"\0") > 0 } @$ret) {
-- # Allow for \0 in position 0 because GNU Parallel uses "\0noarg"
-+ # Allow for \0 in position 0 because Parallel uses "\0noarg"
- # to mean no-string
- ::warning("A NUL character in the input was replaced with \\0.",
- "NUL cannot be passed through in the argument list.",
-
Copied: parallel/repos/community-any/0002-Remove-GNU-branding.patch (from rev
1054414, parallel/trunk/0002-Remove-GNU-branding.patch)
===================================================================
--- 0002-Remove-GNU-branding.patch (rev 0)
+++ 0002-Remove-GNU-branding.patch 2021-11-23 02:18:54 UTC (rev 1054415)
@@ -0,0 +1,263 @@
+--- a/src/parallel
++++ b/src/parallel
+@@ -1750,7 +1750,7 @@ sub parse_parset() {
+ ("@illegal is an invalid variable name.",
+ "Variable names must be letter followed by letters or digits.",
+ "Usage:",
+- " parset varname GNU Parallel options and command");
++ " parset varname Parallel options and command");
+ wait_and_exit(255);
+ }
+ if($var_or_assoc eq "assoc") {
+@@ -1839,7 +1839,7 @@ sub parse_options(@) {
+ if(defined $opt::tmpdir) { $ENV{'TMPDIR'} = $opt::tmpdir; }
+ $ENV{'PARALLEL_RSYNC_OPTS'} = $opt::rsync_opts ||
+ $ENV{'PARALLEL_RSYNC_OPTS'} || '-rlDzR';
+- # Default: Same nice level as GNU Parallel is started at
++ # Default: Same nice level as Parallel is started at
+ $opt::nice ||= eval { getpriority(0,0) } || 0;
+ if(defined $opt::help) { usage(); exit(0); }
+ if(defined $opt::embed) { embed(); exit(0); }
+@@ -2177,7 +2177,7 @@ sub init_globals() {
+ # Defaults:
+ $Global::version = 20211122;
+ $Global::progname = 'parallel';
+- $::name = "GNU Parallel";
++ $::name = "Parallel";
+ $Global::infinity = 2**31;
+ $Global::debug = 0;
+ $Global::verbose = 0;
+@@ -2426,7 +2426,7 @@ sub parse_replacement_string_options() {
+ sub parse_semaphore() {
+ # Semaphore defaults
+ # Must be done before computing number of processes and max_line_length
+- # because when running as a semaphore GNU Parallel does not read args
++ # because when running as a semaphore Parallel does not read args
+ # Uses:
+ # $opt::semaphore
+ # $Global::semaphore
+@@ -3257,7 +3257,7 @@ sub __RUNNING_THE_JOBS_AND_PRINTING_PROGRESS__() {}
+ # $Global::total_started = total number of jobs started
+ # $Global::joblog = filehandle of joblog
+ # $Global::debug = Is debugging on?
+-# $Global::exitstatus = status code of GNU Parallel
++# $Global::exitstatus = status code of Parallel
+ # $Global::quoting = quote the command to run
+
+ sub init_run_jobs() {
+@@ -4170,7 +4170,7 @@ sub setup_basefile() {
+ }
+ debug("init", "basesetup: @cmd\n");
+ my ($exitstatus,$stdout_ref,$stderr_ref) =
+- run_gnu_parallel((join "\n",@cmd),"-j0","--retries",5);
++ run_parallel((join "\n",@cmd),"-j0","--retries",5);
+ if($exitstatus) {
+ my @stdout = @$stdout_ref;
+ my @stderr = @$stderr_ref;
+@@ -4200,7 +4200,7 @@ sub cleanup_basefile() {
+ }
+ debug("init", "basecleanup: @cmd\n");
+ my ($exitstatus,$stdout_ref,$stderr_ref) =
+- run_gnu_parallel(join("\n",@cmd),"-j0","--retries",5);
++ run_parallel(join("\n",@cmd),"-j0","--retries",5);
+ if($exitstatus) {
+ my @stdout = @$stdout_ref;
+ my @stderr = @$stderr_ref;
+@@ -4209,22 +4209,22 @@ sub cleanup_basefile() {
+ }
+ }
+
+-sub run_gnu_parallel() {
++sub run_parallel() {
+ my ($stdin,@args) = @_;
+ my $cmd = join "",map { " $_ & " } split /\n/, $stdin;
+ print $Global::original_stderr ` $cmd wait` ;
+ return 0
+ }
+
+-sub _run_gnu_parallel() {
+- # Run GNU Parallel
++sub _run_parallel() {
++ # Run Parallel
+ # This should ideally just fork an internal copy
+ # and not start it through a shell
+ # Input:
+- # $stdin = data to provide on stdin for GNU Parallel
++ # $stdin = data to provide on stdin for Parallel
+ # @args = command line arguments
+ # Returns:
+- # $exitstatus = exitcode of GNU Parallel run
++ # $exitstatus = exitcode of Parallel run
+ # \@stdout = standard output
+ # \@stderr = standard error
+ my ($stdin,@args) = @_;
+@@ -4614,7 +4614,7 @@ sub onall($@) {
+ );
+ ::debug("init", "| $0 $options\n");
+ open(my $parallel_fh, "|-", "$0 -0 --will-cite -j0 $options") ||
+- ::die_bug("This does not run GNU Parallel: $0 $options");
++ ::die_bug("This does not run Parallel: $0 $options");
+ my @joblogs;
+ for my $host (sort keys %Global::host) {
+ my $sshlogin = $Global::host{$host};
+@@ -4678,14 +4678,14 @@ sub sigpipe() {
+
+ sub signal_children() {
+ # Send signal to all children process groups
+- # and GNU Parallel itself
++ # and Parallel itself
+ # Uses:
+ # %SIG
+ # Returns: N/A
+ my $signal = shift;
+ debug("run", "Sending $signal ");
+ kill $signal, map { -$_ } keys %Global::running;
+- # Use default signal handler for GNU Parallel itself
++ # Use default signal handler for Parallel itself
+ $SIG{$signal} = undef;
+ kill $signal, $$;
+ }
+@@ -4982,7 +4982,7 @@ sub usage() {
+ "--recend str Record end separator for --pipe.",
+ "--recstart str Record start separator for --pipe.",
+ "",
+- "GNU Parallel can do much more. See 'man $Global::progname' for
details",
++ "Parallel can do much more. See 'man $Global::progname' for details",
+ "",
+ "",);
+ }
+@@ -5044,12 +5044,12 @@ sub version() {
+ # Returns: N/A
+ print join
+ ("\n",
+- "GNU $Global::progname $Global::version",
++ "$Global::progname $Global::version",
+ "Copyright (C) 2007-2021 Ole Tange, http://ole.tange.dk and Free
Software",
+ "Foundation, Inc.",
+ "License GPLv3+: GNU GPL version 3 or later
<https://gnu.org/licenses/gpl.html>",
+ "This is free software: you are free to change and redistribute it.",
+- "GNU $Global::progname comes with no warranty.",
++ "$Global::progname comes with no warranty.",
+ "",
+ );
+ }
+@@ -5065,7 +5065,7 @@ sub show_limits() {
+ }
+
+ sub embed() {
+- # Give an embeddable version of GNU Parallel
++ # Give an embeddable version of Parallel
+ # Tested with: bash, zsh, ksh, ash, dash, sh
+ my $randomstring = "cut-here-".join"",
+ map { (0..9,"a".."z","A".."Z")[rand(62)] } (1..20);
+@@ -5110,9 +5110,9 @@ sub embed() {
+ ";
+
+ print q!
+-# Embedded GNU Parallel created with --embed
++# Embedded Parallel created with --embed
+ parallel() {
+- # Start GNU Parallel without leaving temporary files
++ # Start Parallel without leaving temporary files
+ #
+ # Not all shells support 'perl <(cat ...)'
+ # This is a complex way of doing:
+@@ -5123,7 +5123,7 @@ parallel() {
+ # [1]+ Done cat
+
+ # Make a temporary fifo that perl can read from
+- _fifo_with_GNU_Parallel_source=`perl -e 'use POSIX qw(mkfifo);
++ _fifo_with_Parallel_source=`perl -e 'use POSIX qw(mkfifo);
+ do {
+ $f = "/tmp/parallel-".join"",
+ map { (0..9,"a".."z","A".."Z")[rand(62)] } (1..5);
+@@ -5132,9 +5132,9 @@ parallel() {
+ print $f;'`
+ # Put source code into temporary file
+ # so it is easy to copy to the fifo
+- _file_with_GNU_Parallel_source=`mktemp`;
++ _file_with_Parallel_source=`mktemp`;
+ !,
+- "cat <<'$randomstring' > \$_file_with_GNU_Parallel_source\n",
++ "cat <<'$randomstring' > \$_file_with_Parallel_source\n",
+ @source,
+ $randomstring,"\n",
+ q!
+@@ -5142,10 +5142,10 @@ parallel() {
+ # and remove the file and fifo ASAP
+ # 'sh -c' is needed to avoid
+ # [1]+ Done cat
+- sh -c "(rm $_file_with_GNU_Parallel_source; cat
>$_fifo_with_GNU_Parallel_source; rm $_fifo_with_GNU_Parallel_source) <
$_file_with_GNU_Parallel_source &"
++ sh -c "(rm $_file_with_Parallel_source; cat >$_fifo_with_Parallel_source;
rm $_fifo_with_Parallel_source) < $_file_with_Parallel_source &"
+
+ # Read the source from the fifo
+- perl $_fifo_with_GNU_Parallel_source "$@"
++ perl $_fifo_with_Parallel_source "$@"
+ }
+ !,
+ @env_parallel_source,
+@@ -5157,7 +5157,7 @@ env_parallel --session
+ env_parallel -k echo ::: Put your code here
+ parset p,y,c,h -k echo ::: Put your code here
+ echo $p $y $c $h
+-echo You can also activate GNU Parallel for interactive use by:
++echo You can also activate Parallel for interactive use by:
+ echo . "$0"
+ !;
+ } else {
+@@ -6727,7 +6727,7 @@ sub loadavg($) {
+ # Recompute a new one in the background
+ # The load average is computed as the number of processes waiting for disk
+ # or CPU right now. So it is the server load this instant and not
averaged over
+- # several minutes. This is needed so GNU Parallel will at most start one
job
++ # several minutes. This is needed so Parallel will at most start one job
+ # that will push the load over the limit.
+ #
+ # Returns:
+@@ -9054,8 +9054,8 @@ sub base64_zip_eval() {
+ # Returns:
+ # $script = 1-liner for perl -e
+ my $script = ::spacefree(0,q{
+- @GNU_Parallel = split /_/, "use_IPC::Open3;_use_MIME::Base64";
+- eval"@GNU_Parallel";
++ @Parallel = split /_/, "use_IPC::Open3;_use_MIME::Base64";
++ eval"@Parallel";
+ $chld = $SIG{CHLD};
+ $SIG{CHLD} = "IGNORE";
+ # Search for bzip2. Not found => use default path
+@@ -9107,13 +9107,13 @@ sub base64_eval($) {
+ # Will be wrapped in ' so single quote is forbidden.
+ # Spaces are stripped so spaces cannot be significant.
+ # The funny 'use IPC::Open3'-syntax is to avoid spaces and
+- # to make it clear that this is a GNU Parallel command
++ # to make it clear that this is a Parallel command
+ # when looking at the process table.
+ # Returns:
+ # $script = 1-liner for perl -e
+ my $script = ::spacefree(0,q{
+- @GNU_Parallel=("use","IPC::Open3;","use","MIME::Base64");
+- eval "@GNU_Parallel";
++ @Parallel=("use","IPC::Open3;","use","MIME::Base64");
++ eval "@Parallel";
+ my $eval = decode_base64(join"",@ARGV);
+ eval $eval;
+ });
+@@ -10959,7 +10959,7 @@ sub slot($) {
+ # To be safe assume all arguments are one-char
+ # The max_len is cached between runs, but if the size of
+ # the environment is different we need to recompute the
+- # usable max length for this run of GNU Parallel
++ # usable max length for this run of Parallel
+ # See https://unix.stackexchange.com/a/604943/2972
+ if(not $darwin_max_len) {
+ my $envc = (keys %ENV);
+@@ -12154,7 +12154,7 @@ sub get($) {
+ my $ret = $self->{'arg_sub_queue'}->get();
+ if($ret) {
+ if(grep { index($_->orig(),"\0") > 0 } @$ret) {
+- # Allow for \0 in position 0 because GNU Parallel uses "\0noarg"
++ # Allow for \0 in position 0 because Parallel uses "\0noarg"
+ # to mean no-string
+ ::warning("A NUL character in the input was replaced with \\0.",
+ "NUL cannot be passed through in the argument list.",
+
Deleted: PKGBUILD
===================================================================
--- PKGBUILD 2021-11-23 02:17:55 UTC (rev 1054414)
+++ PKGBUILD 2021-11-23 02:18:54 UTC (rev 1054415)
@@ -1,45 +0,0 @@
-# Maintainer: Johannes Löthberg <johan...@kyriasis.com>
-# Contributor: George Rawlinson <grawlin...@archlinux.org>
-# Contributor: Timothy Redaelli <timothy.redae...@gmail.com>
-# Contributor: Vianney le Clément <vleclement AT gmail·com>
-# Contributor: Peter Simons <sim...@cryp.to>
-
-pkgname=parallel
-pkgver=20211022
-pkgrel=1
-pkgdesc='A shell tool for executing jobs in parallel'
-arch=('any')
-url='https://www.gnu.org/software/parallel/'
-license=('GPL3')
-depends=('perl' 'procps')
-source=(https://ftp.gnu.org/gnu/$pkgname/$pkgname-$pkgver.tar.bz2{,.sig}
- 0001-Remove-citation-things.patch
- 0002-Remove-GNU-branding.patch)
-sha512sums=('bf48f7b13ecfae7275efa5935fcbfbbc942c290daa226243c12de15f3a4579ce64c862b8bae93e5c97af798fb529d4cd750e6b83803f48c33604e3a3212fe157'
- 'SKIP'
-
'fa594beb8cf8298c52f10251263cd23109cb125fc4dafd84d1d366cbf923f2d460438dbf20250712cfa4249d0e7fe18941b531fb16e0a6fc41acee8b77bf4fad'
-
'211f6f65d1b1ad6a7fad827ddc0cb1a83d43b5fa8c542337a1fed4e550a3bf0e4941f37ef7d12943b15f789f616f9aa14a959da09af783466475a19ef84720d7')
-b2sums=('3d50e5fd078b69c7d9b0f2c27d3c853d7b731ed5a04ff74a763691e36e89bbc10b79a95ad6c96bfe760a6fc56ca3b4d86dc1a4d2315c17c1cbb307bc2300e95d'
- 'SKIP'
-
'147cf080306bf978ac625dddb717c83c14f6dfdc2f61b429e1f4cd239b477d30a9f8e630722f0226d035e6a053dd797a0c9b5898dd9440bd9aa3b2d0689d8927'
-
'd3c6e1546b5d806d5c0762a697fb1bf72b642472c7960a70d818e1803e7f7ca00561ef2e87a9614ec6bafce05172fe1f67b38cb009113f9280f4a658b5b1e1d8')
-validpgpkeys=('CDA01A4208C4F74506107E7BD1AB451688888888')
-
-prepare() {
- cd parallel-$pkgver
- patch -p1 <"$srcdir"/0001-Remove-citation-things.patch
- patch -p1 <"$srcdir"/0002-Remove-GNU-branding.patch
-}
-
-build() {
- cd parallel-$pkgver
- ./configure --prefix=/usr
- make
-}
-
-package() {
- cd parallel-$pkgver
- make DESTDIR="$pkgdir/" install
-}
-
-# vim:set ts=2 sw=2 et:
Copied: parallel/repos/community-any/PKGBUILD (from rev 1054414,
parallel/trunk/PKGBUILD)
===================================================================
--- PKGBUILD (rev 0)
+++ PKGBUILD 2021-11-23 02:18:54 UTC (rev 1054415)
@@ -0,0 +1,45 @@
+# Maintainer: Johannes Löthberg <johan...@kyriasis.com>
+# Contributor: George Rawlinson <grawlin...@archlinux.org>
+# Contributor: Timothy Redaelli <timothy.redae...@gmail.com>
+# Contributor: Vianney le Clément <vleclement AT gmail·com>
+# Contributor: Peter Simons <sim...@cryp.to>
+
+pkgname=parallel
+pkgver=20211122
+pkgrel=1
+pkgdesc='A shell tool for executing jobs in parallel'
+arch=('any')
+url='https://www.gnu.org/software/parallel/'
+license=('GPL3')
+depends=('perl' 'procps')
+source=(https://ftp.gnu.org/gnu/$pkgname/$pkgname-$pkgver.tar.bz2{,.sig}
+ 0001-Remove-citation-things.patch
+ 0002-Remove-GNU-branding.patch)
+sha512sums=('3cadf5be292e28c7a24653ed7d712a087d98cf7332a677a7f10c5abb260d82b8e5cbd9c61f25c77b1b08427716bd47a3483e6c1e188a594c0ef2e881aa055e83'
+ 'SKIP'
+
'0450c81cf68d6d42814418e012f8cf64f515e1c89c2b2e833ee0e660518af76fd7046fd8aaf7dd04d0272a9c766930a63a3388e3cdbd7ea8030da0d780af27e0'
+
'304fc64ce5b5b664bdd1480da54863c061940f5f6255d13462f3bec5ff742636f34769650c64875dc7dda7c552b7ba6ee63f8fea1aa914f6d2210f2d49a2ba7b')
+b2sums=('55a9243f8781a781b75d51d0d6864ae2ccd5ef80d3da5227272826b400ec9e05dc62cbfbca09cd2e342d286b4eac3f99ec6c647c285e606cc903ab05808636a9'
+ 'SKIP'
+
'a4bfe7d7e7a0c9fa30e10b291e08f31c807ef99dfa9f5054d6e9a4ddf9edcb2f9a33a4af3b6080f53be1d4fe559e4204692bb833c2aa83d69bb03409db7d5e71'
+
'684576067936f30e24a00c0283b961f56451eb8924a26c6f426a23521b1e272890772e51d817de7386ebf6863c5f8ba9c5598d17d56f3df1875f4b36bcee13d3')
+validpgpkeys=('CDA01A4208C4F74506107E7BD1AB451688888888')
+
+prepare() {
+ cd parallel-$pkgver
+ patch -p1 <"$srcdir"/0001-Remove-citation-things.patch
+ patch -p1 <"$srcdir"/0002-Remove-GNU-branding.patch
+}
+
+build() {
+ cd parallel-$pkgver
+ ./configure --prefix=/usr
+ make
+}
+
+package() {
+ cd parallel-$pkgver
+ make DESTDIR="$pkgdir/" install
+}
+
+# vim:set ts=2 sw=2 et:
