Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-Pod-Spell for openSUSE:Factory
checked in at 2023-03-15 18:53:27
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Pod-Spell (Old)
and /work/SRC/openSUSE:Factory/.perl-Pod-Spell.new.31432 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Pod-Spell"
Wed Mar 15 18:53:27 2023 rev:22 rq:1071469 version:1.26
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Pod-Spell/perl-Pod-Spell.changes
2022-10-15 16:40:39.786615624 +0200
+++ /work/SRC/openSUSE:Factory/.perl-Pod-Spell.new.31432/perl-Pod-Spell.changes
2023-03-15 18:53:34.100083596 +0100
@@ -1,0 +2,10 @@
+Tue Mar 14 03:07:11 UTC 2023 - Tina Müller <timueller+p...@suse.de>
+
+- updated to 1.26
+ see /usr/share/doc/packages/perl-Pod-Spell/Changes
+
+ 1.26 2023-03-13
+
+ - encode output as UTF-8
+
+-------------------------------------------------------------------
Old:
----
Pod-Spell-1.25.tar.gz
New:
----
Pod-Spell-1.26.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Pod-Spell.spec ++++++
--- /var/tmp/diff_new_pack.zdFrZ4/_old 2023-03-15 18:53:35.032088553 +0100
+++ /var/tmp/diff_new_pack.zdFrZ4/_new 2023-03-15 18:53:35.040088596 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Pod-Spell
#
-# Copyright (c) 2022 SUSE LLC
+# Copyright (c) 2023 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -18,7 +18,7 @@
%define cpan_name Pod-Spell
Name: perl-Pod-Spell
-Version: 1.25
+Version: 1.26
Release: 0
License: Artistic-2.0
Summary: Formatter for spellchecking Pod
++++++ Pod-Spell-1.25.tar.gz -> Pod-Spell-1.26.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/.perlcriticrc
new/Pod-Spell-1.26/.perlcriticrc
--- old/Pod-Spell-1.25/.perlcriticrc 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/.perlcriticrc 2023-03-13 21:22:22.000000000 +0100
@@ -20,14 +20,12 @@
[ClassHierarchies::ProhibitOneArgBless]
[CodeLayout::ProhibitHardTabs]
[CodeLayout::RequireConsistentNewlines]
-[ControlStructures::ProhibitCascadingIfElse]
[ControlStructures::ProhibitDeepNests]
[ControlStructures::ProhibitLabelsWithSpecialBlockNames]
[ControlStructures::ProhibitMutatingListFunctions]
[ControlStructures::ProhibitNegativeExpressionsInUnlessAndUntilConditions]
[ControlStructures::ProhibitUnreachableCode]
[ControlStructures::ProhibitYadaOperator]
-[ErrorHandling::RequireCarping]
[ErrorHandling::RequireCheckingReturnValueOfEval]
[InputOutput::ProhibitBacktickOperators]
[InputOutput::ProhibitBarewordFileHandles]
@@ -37,7 +35,6 @@
[InputOutput::ProhibitOneArgSelect]
[InputOutput::ProhibitReadlineInForLoop]
[InputOutput::ProhibitTwoArgOpen]
-[InputOutput::RequireBriefOpen]
[InputOutput::RequireCheckedOpen]
[InputOutput::RequireEncodingWithUTF8Layer]
[Miscellanea::ProhibitFormats]
@@ -64,6 +61,7 @@
[Subroutines::ProhibitReturnSort]
[Subroutines::ProhibitSubroutinePrototypes]
[Subroutines::ProhibitUnusedPrivateSubroutines]
+allow_name_regex = _handle_\w+
[Subroutines::ProtectPrivateSubs]
[TestingAndDebugging::ProhibitNoStrict]
[TestingAndDebugging::ProhibitNoWarnings]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/Changes new/Pod-Spell-1.26/Changes
--- old/Pod-Spell-1.25/Changes 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/Changes 2023-03-13 21:22:22.000000000 +0100
@@ -1,5 +1,9 @@
Revision history Pod-Spell
+1.26 2023-03-13
+
+ - encode output as UTF-8
+
1.25 2022-10-04
- releasing as stable
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/LICENSE new/Pod-Spell-1.26/LICENSE
--- old/Pod-Spell-1.25/LICENSE 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/LICENSE 2023-03-13 21:22:22.000000000 +0100
@@ -1,4 +1,4 @@
-This software is Copyright (c) 2022 by Olivier Mengué.
+This software is Copyright (c) 2023 by Olivier Mengué.
This is free software, licensed under:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/MANIFEST new/Pod-Spell-1.26/MANIFEST
--- old/Pod-Spell-1.25/MANIFEST 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/MANIFEST 2023-03-13 21:22:22.000000000 +0100
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.025.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.030.
.perlcriticrc
CONTRIBUTING
Changes
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/META.json new/Pod-Spell-1.26/META.json
--- old/Pod-Spell-1.25/META.json 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/META.json 2023-03-13 21:22:22.000000000 +0100
@@ -5,7 +5,7 @@
"Caleb Cushing <xenoterrac...@gmail.com>"
],
"dynamic_config" : 0,
- "generated_by" : "Dist::Zilla version 6.025, CPAN::Meta::Converter version
2.150010",
+ "generated_by" : "Dist::Zilla version 6.030, CPAN::Meta::Converter version
2.150010",
"license" : [
"artistic_2"
],
@@ -26,6 +26,7 @@
},
"develop" : {
"requires" : {
+ "Perl::Critic" : "1.150",
"Pod::Coverage::TrustPod" : "0",
"Test::CPAN::Changes" : "0.19",
"Test::CPAN::Meta" : "0",
@@ -76,11 +77,11 @@
"provides" : {
"Pod::Spell" : {
"file" : "lib/Pod/Spell.pm",
- "version" : "1.25"
+ "version" : "1.26"
},
"Pod::Wordlist" : {
"file" : "lib/Pod/Wordlist.pm",
- "version" : "1.25"
+ "version" : "1.26"
}
},
"release_status" : "stable",
@@ -96,7 +97,7 @@
"web" : "https://github.com/perl-pod/Pod-Spell";
}
},
- "version" : "1.25",
+ "version" : "1.26",
"x_contributors" : [
"David Golden <dagol...@cpan.org>",
"Graham Knop <ha...@haarg.org>",
@@ -106,7 +107,7 @@
"Paulo Custodio <pauloscusto...@gmail.com>"
],
"x_generated_by_perl" : "v5.34.0",
- "x_serialization_backend" : "Cpanel::JSON::XS version 4.30",
+ "x_serialization_backend" : "Cpanel::JSON::XS version 4.32",
"x_spdx_expression" : "Artistic-2.0",
"x_use_unsafe_inc" : 0
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/META.yml new/Pod-Spell-1.26/META.yml
--- old/Pod-Spell-1.25/META.yml 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/META.yml 2023-03-13 21:22:22.000000000 +0100
@@ -14,7 +14,7 @@
ExtUtils::MakeMaker: '0'
File::ShareDir::Install: '0.06'
dynamic_config: 0
-generated_by: 'Dist::Zilla version 6.025, CPAN::Meta::Converter version
2.150010'
+generated_by: 'Dist::Zilla version 6.030, CPAN::Meta::Converter version
2.150010'
license: artistic_2
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -23,10 +23,10 @@
provides:
Pod::Spell:
file: lib/Pod/Spell.pm
- version: '1.25'
+ version: '1.26'
Pod::Wordlist:
file: lib/Pod/Wordlist.pm
- version: '1.25'
+ version: '1.26'
requires:
Carp: '0'
Class::Tiny: '0'
@@ -44,7 +44,7 @@
bugtracker: https://rt.cpan.org/Public/Dist/Display.html?Name=Pod-Spell
homepage: https://github.com/perl-pod/Pod-Spell
repository: https://github.com/perl-pod/Pod-Spell.git
-version: '1.25'
+version: '1.26'
x_contributors:
- 'David Golden <dagol...@cpan.org>'
- 'Graham Knop <ha...@haarg.org>'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/Makefile.PL
new/Pod-Spell-1.26/Makefile.PL
--- old/Pod-Spell-1.25/Makefile.PL 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/Makefile.PL 2023-03-13 21:22:22.000000000 +0100
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.025.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.030.
use strict;
use warnings;
@@ -47,7 +47,7 @@
"IPC::Open3" => 0,
"Test::More" => "0.88"
},
- "VERSION" => "1.25",
+ "VERSION" => "1.26",
"test" => {
"TESTS" => "t/*.t"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/README new/Pod-Spell-1.26/README
--- old/Pod-Spell-1.25/README 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/README 2023-03-13 21:22:22.000000000 +0100
@@ -1,32 +1,35 @@
NAME
+
Pod::Spell - a formatter for spellchecking Pod
VERSION
- version 1.25
+
+ version 1.26
SYNOPSIS
+
use Pod::Spell;
Pod::Spell->new->parse_from_file( 'File.pm' );
-
+
Pod::Spell->new->parse_from_filehandle( $infile, $outfile );
Also look at podspell
% perl -MPod::Spell -e "Pod::Spell->new->parse_from_file(shift)"
Thing.pm |spell |fmt
- ...or instead of piping to spell or "ispell", use ">temp.txt", and open
+ ...or instead of piping to spell or ispell, use >temp.txt, and open
temp.txt in your word processor for spell-checking.
DESCRIPTION
+
Pod::Spell is a Pod formatter whose output is good for spellchecking.
Pod::Spell is rather like Pod::Text, except that it doesn't put much
effort into actual formatting, and it suppresses things that look like
Perl symbols or Perl jargon (so that your spellchecking program won't
- complain about mystery words like "$thing" or ""Foo::Bar"" or
- "hashref").
+ complain about mystery words like "$thing" or "Foo::Bar" or "hashref").
This class works by filtering out words that look like Perl or any form
- of computerese (like "$thing" or ""N>7"" or ""@{$foo}{'bar','baz'}"",
+ of computerese (like "$thing" or "N>7" or "@{$foo}{'bar','baz'}",
anything in C<...> or F<...> codes, anything in verbatim paragraphs
(code blocks), and anything in the stopword list. The default stopword
list for a document starts out from the stopword list defined by
@@ -34,58 +37,66 @@
having "=for stopwords" / "=for :stopwords" region(s) in a document.
METHODS
- new
+
+ new
+
Pod::Spell->new(%options)
Creates a new Pod::Spell instance. Accepts several options:
debug
- When set to a true value, will output debugging messages about how
- the Pod is being processed.
- Defaults to false.
+ When set to a true value, will output debugging messages about how
+ the Pod is being processed.
+
+ Defaults to false.
stopwords
- Can be specified to use an alternate wordlist instance.
- Defaults to a new Pod::Wordlist instance.
+ Can be specified to use an alternate wordlist instance.
+
+ Defaults to a new Pod::Wordlist instance.
no_wide_chars
- Will be passed to Pod::Wordlist when creating a new instance. Causes
- all words with characters outside the Latin-1 range to be stripped
- from the output.
- stopwords
+ Will be passed to Pod::Wordlist when creating a new instance. Causes
+ all words with characters outside the Latin-1 range to be stripped
+ from the output.
+
+ stopwords
+
$self->stopwords->isa('Pod::WordList'); # true
- parse_from_filehandle($in_fh,$out_fh)
+ parse_from_filehandle($in_fh,$out_fh)
+
This method takes an input filehandle (which is assumed to already be
- opened for reading) and reads the entire input stream looking for blocks
- (paragraphs) of POD documentation to be processed. If no first argument
- is given the default input filehandle "STDIN" is used.
+ opened for reading) and reads the entire input stream looking for
+ blocks (paragraphs) of POD documentation to be processed. If no first
+ argument is given the default input filehandle STDIN is used.
The $in_fh parameter may be any object that provides a getline() method
to retrieve a single line of input text (hence, an appropriate wrapper
object could be used to parse PODs from a single string or an array of
strings).
- parse_from_file($filename,$outfile)
+ parse_from_file($filename,$outfile)
+
This method takes a filename and does the following:
- * opens the input and output files for reading (creating the appropriate
- filehandles)
+ * opens the input and output files for reading (creating the
+ appropriate filehandles)
- * invokes the parse_from_filehandle() method passing it the
+ * invokes the parse_from_filehandle() method passing it the
corresponding input and output filehandles.
- * closes the input and output files.
+ * closes the input and output files.
If the special input filename "", "-" or "<&STDIN" is given then the
STDIN filehandle is used for input (and no open or close is performed).
If no input filename is specified then "-" is implied. Filehandle
references, or objects that support the regular IO operations (like
- "<$fh>" or "$fh-<Egt"getline>) are also accepted; the handles must
- already be opened.
+ <$fh> or $fh-<Egtgetline>) are also accepted; the handles must already
+ be opened.
If a second argument is given then it should be the name of the desired
output file. If the special output filename "-" or ">&STDOUT" is given
@@ -95,35 +106,38 @@
performed). If no output filehandle is currently in use and no output
filename is specified, then "-" is implied. Alternatively, filehandle
references or objects that support the regular IO operations (like
- "print", e.g. IO::String) are also accepted; the object must already be
+ print, e.g. IO::String) are also accepted; the object must already be
opened.
ENCODINGS
+
If your Pod is encoded in something other than Latin-1, it should
- declare an encoding using the ""=encoding *encodingname*"" in perlpod
+ declare an encoding using the "=encoding encodingname" in perlpod
directive.
ADDING STOPWORDS
+
You can add stopwords on a per-document basis with "=for stopwords" /
"=for :stopwords" regions, like so:
=for stopwords plok Pringe zorch snik !qux
foo bar baz quux quuux
- This adds every word in that paragraph after "stopwords" to the stopword
- list, effective for the rest of the document. In such a list, words are
- whitespace-separated. (The amount of whitespace doesn't matter, as long
- as there's no blank lines in the middle of the paragraph.) Plural forms
- are added automatically using Lingua::EN::Inflect. Words beginning with
- "!" are *deleted* from the stopword list -- so "!qux" deletes "qux" from
- the stopword list, if it was in there in the first place. Note that if a
- stopword is all-lowercase, then it means that it's okay in *any* case;
- but if the word has any capital letters, then it means that it's okay
- *only* with *that* case. So a Wordlist entry of "perl" would permit
- "perl", "Perl", and (less interestingly) "PERL", "pERL", "PerL", et
- cetera. However, a Wordlist entry of "Perl" catches only "Perl", not
- "perl". So if you wanted to make sure you said only "Perl", never
- "perl", you could add this to the top of your document:
+ This adds every word in that paragraph after "stopwords" to the
+ stopword list, effective for the rest of the document. In such a list,
+ words are whitespace-separated. (The amount of whitespace doesn't
+ matter, as long as there's no blank lines in the middle of the
+ paragraph.) Plural forms are added automatically using
+ Lingua::EN::Inflect. Words beginning with "!" are deleted from the
+ stopword list -- so "!qux" deletes "qux" from the stopword list, if it
+ was in there in the first place. Note that if a stopword is
+ all-lowercase, then it means that it's okay in any case; but if the
+ word has any capital letters, then it means that it's okay only with
+ that case. So a Wordlist entry of "perl" would permit "perl", "Perl",
+ and (less interestingly) "PERL", "pERL", "PerL", et cetera. However, a
+ Wordlist entry of "Perl" catches only "Perl", not "perl". So if you
+ wanted to make sure you said only "Perl", never "perl", you could add
+ this to the top of your document:
=for stopwords !perl Perl
@@ -136,79 +150,87 @@
even express them like so:
=begin stopwords
-
+
plok Pringe zorch
-
+
snik !qux
-
+
foo bar
baz quux quuux
-
+
=end stopwords
- If you want to use E<...> sequences in a "stopwords" region, you have to
- use ":stopwords", as here:
+ If you want to use E<...> sequences in a "stopwords" region, you have
+ to use ":stopwords", as here:
=for :stopwords
virtE<ugrave>
- ...meaning that you're adding a stopword of "virtù". If you left the ":"
- out, that would mean you were adding a stopword of "virtE<ugrave>" (with
- a literal E, a literal <, etc), which will have no effect, since any
- occurrences of virtE<ugrave> don't look like a normal human-language
- word anyway, and so would be screened out before the stopword list is
- consulted anyway.
+ ...meaning that you're adding a stopword of "virtù". If you left the
+ ":" out, that would mean you were adding a stopword of "virtE<ugrave>"
+ (with a literal E, a literal <, etc), which will have no effect, since
+ any occurrences of virtE<ugrave> don't look like a normal
+ human-language word anyway, and so would be screened out before the
+ stopword list is consulted anyway.
CAVEATS
- finding stopwords defined with "=for"
+
+ finding stopwords defined with =for
+
Pod::Spell makes a single pass over the POD. Stopwords must be added
before they show up in the POD.
HINT
+
If you feed output of Pod::Spell into your word processor and run a
- spell-check, make sure you're *not* also running a grammar-check --
+ spell-check, make sure you're not also running a grammar-check --
because Pod::Spell drops words that it thinks are Perl symbols, jargon,
or stopwords, this means you'll have ungrammatical sentences, what with
words being missing and all. And you don't need a grammar checker to
tell you that.
SEE ALSO
- * Pod::Wordlist
- * Pod::Simple
+ * Pod::Wordlist
+
+ * Pod::Simple
- * podchecker also known as Pod::Checker
+ * podchecker also known as Pod::Checker
- * perlpod, perlpodspec
+ * perlpod, perlpodspec
BUGS
+
Please report any bugs or feature requests on the bugtracker website
- <https://rt.cpan.org/Public/Dist/Display.html?Name=Pod-Spell> or by
- email to bug-pod-sp...@rt.cpan.org <mailto:bug-pod-sp...@rt.cpan.org>.
+ https://rt.cpan.org/Public/Dist/Display.html?Name=Pod-Spell or by email
+ to bug-pod-sp...@rt.cpan.org <mailto:bug-pod-sp...@rt.cpan.org>.
When submitting a bug or request, please include a test-file or a patch
to an existing test-file that illustrates the bug or desired feature.
CONTRIBUTORS
- * David Golden <dagol...@cpan.org>
- * Graham Knop <ha...@haarg.org>
+ * David Golden <dagol...@cpan.org>
- * Kent Fredric <kentfred...@gmail.com>
+ * Graham Knop <ha...@haarg.org>
- * Mohammad S Anwar <mohammad.an...@yahoo.com>
+ * Kent Fredric <kentfred...@gmail.com>
- * Olivier Mengué <dol...@cpan.org>
+ * Mohammad S Anwar <mohammad.an...@yahoo.com>
- * Paulo Custodio <pauloscusto...@gmail.com>
+ * Olivier Mengué <dol...@cpan.org>
+
+ * Paulo Custodio <pauloscusto...@gmail.com>
AUTHORS
- * Sean M. Burke <sbu...@cpan.org>
- * Caleb Cushing <xenoterrac...@gmail.com>
+ * Sean M. Burke <sbu...@cpan.org>
+
+ * Caleb Cushing <xenoterrac...@gmail.com>
COPYRIGHT AND LICENSE
- This software is Copyright (c) 2022 by Olivier Mengué.
+
+ This software is Copyright (c) 2023 by Olivier Mengué.
This is free software, licensed under:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/bin/podspell
new/Pod-Spell-1.26/bin/podspell
--- old/Pod-Spell-1.25/bin/podspell 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/bin/podspell 2023-03-13 21:22:22.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.26';
use Pod::Spell;
@@ -43,7 +43,7 @@
=head1 VERSION
-version 1.25
+version 1.26
=head1 SYNOPSIS
@@ -75,7 +75,7 @@
=head1 COPYRIGHT AND LICENSE
-This software is Copyright (c) 2022 by Olivier Mengué.
+This software is Copyright (c) 2023 by Olivier Mengué.
This is free software, licensed under:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/dist.ini new/Pod-Spell-1.26/dist.ini
--- old/Pod-Spell-1.25/dist.ini 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/dist.ini 2023-03-13 21:22:22.000000000 +0100
@@ -38,7 +38,7 @@
[MetaJSON]
[MetaYAML]
[Manifest]
-[Pod2Readme]
+[ReadmeAnyFromPod]
;;; Installer
[ExecDir]
@@ -73,6 +73,8 @@
[Test::NoTabs]
[Test::Perl::Critic]
critic_config = .perlcriticrc
+[Prereqs / DevelopRequires]
+Perl::Critic = 1.150
[Test::PodSpelling]
[Test::Portability]
[Test::ReportPrereqs]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/lib/Pod/Spell.pm
new/Pod-Spell-1.26/lib/Pod/Spell.pm
--- old/Pod-Spell-1.25/lib/Pod/Spell.pm 2022-10-04 18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/lib/Pod/Spell.pm 2023-03-13 21:22:22.000000000 +0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.26';
sub new {
my ( $class, %args ) = @_;
@@ -22,7 +22,9 @@
my $parser = Pod::Spell::_Processor->new;
$parser->stopwords($stopwords);
$parser->_is_debug($debug);
- $parser->output_fh(\*STDOUT);
+ open my $output_fh, '>&:encoding(UTF-8)', \*STDOUT
+ or die "can't dup STDOUT: $!";
+ $parser->output_fh($output_fh);
my %self = (
processor => $parser,
@@ -71,7 +73,7 @@
F => 1,
);
-sub _handle_element_start { ## no critic
(Subroutines::ProhibitUnusedPrivateSubroutines)
+sub _handle_element_start {
my ($self, $element_name, $attr) = @_;
$self->{buffer} = ''
if !defined $self->{buffer};
@@ -81,13 +83,12 @@
}
}
-sub _handle_text { ## no critic (Subroutines::ProhibitUnusedPrivateSubroutines)
+sub _handle_text {
my ($self, $text) = @_;
my $in = $self->{in_element};
if ($in && @$in) {
my ($element_name, $attr) = @{$in->[-1]};
- ## no critic (ControlStructures::ProhibitCascadingIfElse)
if ($element_name eq 'for' && $attr->{target_matching} eq 'stopwords')
{
# this will match both for/begin and stopwords/:stopwords
@@ -117,7 +118,7 @@
$self->{buffer} .= $text;
}
-sub _handle_element_end { ## no critic
(Subroutines::ProhibitUnusedPrivateSubroutines)
+sub _handle_element_end {
my ($self, $element_name) = @_;
my $in = $self->{in_element};
@@ -144,7 +145,7 @@
return
if !length $out;
- local $Text::Wrap::huge = 'overflow'; ## no critic (
Variables::ProhibitPackageVars )
+ local $Text::Wrap::huge = 'overflow';
print { $fh } Text::Wrap::wrap( '', '', $out ) . "\n\n";
}
@@ -164,7 +165,7 @@
=head1 VERSION
-version 1.25
+version 1.26
=head1 SYNOPSIS
@@ -436,7 +437,7 @@
=head1 COPYRIGHT AND LICENSE
-This software is Copyright (c) 2022 by Olivier Mengué.
+This software is Copyright (c) 2023 by Olivier Mengué.
This is free software, licensed under:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/lib/Pod/Wordlist.pm
new/Pod-Spell-1.26/lib/Pod/Wordlist.pm
--- old/Pod-Spell-1.25/lib/Pod/Wordlist.pm 2022-10-04 18:46:27.000000000
+0200
+++ new/Pod-Spell-1.26/lib/Pod/Wordlist.pm 2023-03-13 21:22:22.000000000
+0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
-our $VERSION = '1.25';
+our $VERSION = '1.26';
use Lingua::EN::Inflect 'PL';
use File::Spec ();
@@ -192,7 +192,7 @@
=head1 VERSION
-version 1.25
+version 1.26
=head1 DESCRIPTION
@@ -281,7 +281,7 @@
=head1 COPYRIGHT AND LICENSE
-This software is Copyright (c) 2022 by Olivier Mengué.
+This software is Copyright (c) 2023 by Olivier Mengué.
This is free software, licensed under:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/t/00-report-prereqs.dd
new/Pod-Spell-1.26/t/00-report-prereqs.dd
--- old/Pod-Spell-1.25/t/00-report-prereqs.dd 2022-10-04 18:46:27.000000000
+0200
+++ new/Pod-Spell-1.26/t/00-report-prereqs.dd 2023-03-13 21:22:22.000000000
+0100
@@ -10,6 +10,7 @@
},
'develop' => {
'requires' => {
+ 'Perl::Critic' => '1.150',
'Pod::Coverage::TrustPod' => '0',
'Test::CPAN::Changes' => '0.19',
'Test::CPAN::Meta' => '0',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/t/00-report-prereqs.t
new/Pod-Spell-1.26/t/00-report-prereqs.t
--- old/Pod-Spell-1.25/t/00-report-prereqs.t 2022-10-04 18:46:27.000000000
+0200
+++ new/Pod-Spell-1.26/t/00-report-prereqs.t 2023-03-13 21:22:22.000000000
+0100
@@ -3,7 +3,7 @@
use strict;
use warnings;
-# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.028
+# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.029
use Test::More tests => 1;
@@ -109,20 +109,24 @@
my @reports = [qw/Module Want Have/];
for my $mod ( sort keys %{ $req_hash->{$phase}{$type} } ) {
- next if $mod eq 'perl';
next if grep { $_ eq $mod } @exclude;
- my $file = $mod;
- $file =~ s{::}{/}g;
- $file .= ".pm";
- my ($prefix) = grep { -e File::Spec->catfile($_, $file) } @INC;
-
my $want = $req_hash->{$phase}{$type}{$mod};
$want = "undef" unless defined $want;
$want = "any" if !$want && $want == 0;
+ if ($mod eq 'perl') {
+ push @reports, ['perl', $want, $]];
+ next;
+ }
+
my $req_string = $want eq 'any' ? 'any version required' :
"version '$want' required";
+ my $file = $mod;
+ $file =~ s{::}{/}g;
+ $file .= ".pm";
+ my ($prefix) = grep { -e File::Spec->catfile($_, $file) } @INC;
+
if ($prefix) {
my $have = MM->parse_version( File::Spec->catfile($prefix,
$file) );
$have = "undef" unless defined $have;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/xt/author/distmeta.t
new/Pod-Spell-1.26/xt/author/distmeta.t
--- old/Pod-Spell-1.25/xt/author/distmeta.t 2022-10-04 18:46:27.000000000
+0200
+++ new/Pod-Spell-1.26/xt/author/distmeta.t 2023-03-13 21:22:22.000000000
+0100
@@ -1,6 +1,7 @@
#!perl
# This file was automatically generated by Dist::Zilla::Plugin::MetaTests.
-
+use strict;
+use warnings;
use Test::CPAN::Meta;
meta_yaml_ok();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/xt/author/pod-coverage.t
new/Pod-Spell-1.26/xt/author/pod-coverage.t
--- old/Pod-Spell-1.25/xt/author/pod-coverage.t 2022-10-04 18:46:27.000000000
+0200
+++ new/Pod-Spell-1.26/xt/author/pod-coverage.t 2023-03-13 21:22:22.000000000
+0100
@@ -1,6 +1,7 @@
#!perl
# This file was automatically generated by
Dist::Zilla::Plugin::PodCoverageTests.
-
+use strict;
+use warnings;
use Test::Pod::Coverage 1.08;
use Pod::Coverage::TrustPod;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/xt/author/portability.t
new/Pod-Spell-1.26/xt/author/portability.t
--- old/Pod-Spell-1.25/xt/author/portability.t 2022-10-04 18:46:27.000000000
+0200
+++ new/Pod-Spell-1.26/xt/author/portability.t 2023-03-13 21:22:22.000000000
+0100
@@ -3,8 +3,6 @@
use Test::More;
-eval 'use Test::Portability::Files';
-plan skip_all => 'Test::Portability::Files required for testing portability'
- if $@;
+use Test::Portability::Files;
run_tests();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Pod-Spell-1.25/xt/release/changes_has_content.t
new/Pod-Spell-1.26/xt/release/changes_has_content.t
--- old/Pod-Spell-1.25/xt/release/changes_has_content.t 2022-10-04
18:46:27.000000000 +0200
+++ new/Pod-Spell-1.26/xt/release/changes_has_content.t 2023-03-13
21:22:22.000000000 +0100
@@ -2,7 +2,7 @@
note 'Checking Changes';
my $changes_file = 'Changes';
-my $newver = '1.25';
+my $newver = '1.26';
my $trial_token = '-TRIAL';
my $encoding = 'UTF-8';
