Skip to content

Commit 0f6ccd0

Browse files
committed
Fix some pod issues
1 parent 7c9d6d5 commit 0f6ccd0

File tree

5 files changed

+25
-7
lines changed

5 files changed

+25
-7
lines changed

README

Lines changed: 7 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -427,7 +427,7 @@ IMPORT ARGUMENTS
427427

428428
:stacked
429429
Implies :import, but if there is already an "AUTOLOAD" defined, the
430-
overriding "AUTOLOAD" will still give it a chance to run. See "STACKED
430+
overriding "AUTOLOAD" will still give it a chance to run. See "STACKABLE
431431
AUTOLOADs".
432432

433433
ANYTHING ELSE
@@ -466,7 +466,7 @@ SPECIAL TAGS
466466
comment delimiters. Any occurences of '--' in the concatenated arguments
467467
are converted to '--'
468468

469-
xmldecl(@args)
469+
xmldecl (@args)
470470
Declaration. This can be used to specify the version, encoding, and
471471
other XML-related declarations (i.e., anything inside the <?xml?> tag).
472472
@args can be used to control what is output, as keyword-value pairs.
@@ -552,7 +552,7 @@ CREATING A SUBCLASS
552552

553553
sub table {
554554
my $self = shift;
555-
555+
556556
# parse our args to get namespace and attribute info
557557
my($namespace, $attr, @content) =
558558
$self->XML::Generator::util::parse_args(@_)
@@ -662,6 +662,10 @@ AUTHORS
662662
Nathan Wiger <nate@nateware.com>
663663
Modular rewrite to enable subclassing
664664

665+
LICENSE
666+
This library is free software, you can redistribute it and/or modify it
667+
under the same terms as Perl itself.
668+
665669
SEE ALSO
666670
The XML::Writer module
667671
http://search.cpan.org/search?mode=module&query=XML::Writer

cpanfile

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -13,5 +13,6 @@ on 'configure' => sub {
1313
};
1414

1515
on 'develop' => sub {
16+
requires "Test::Pod" => "1.41";
1617
requires "Test::Spelling" => "0.12";
1718
};

dist.ini

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -29,6 +29,7 @@ Test = 0
2929
format = %v -- %{EEE MMM dd HH:mm:ss VVV yyyy}d
3030
filename = Changes
3131

32+
[PodSyntaxTests]
3233
[Test::PodSpelling]
3334
stopword = Bron
3435
stopword = CDATA

lib/XML/Generator.pm

Lines changed: 10 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
package XML::Generator;
22

33
use strict;
4+
use warnings;
45
use Carp;
56
use vars qw/$VERSION $AUTOLOAD/;
67

@@ -27,7 +28,7 @@ XML::Generator - Perl extension for generating XML
2728
print $X->foo($X->bar({ baz => 3 }, $X->bam()),
2829
$X->bar([ 'qux' => 'http://qux.com/' ],
2930
"Hey there, world"));
30-
31+
3132
Either of the above yield:
3233
3334
<foo xmlns:qux="http://qux.com/">
@@ -451,7 +452,7 @@ Note that if you already have an C<AUTOLOAD> defined, it will be overwritten.
451452
=head2 :stacked
452453
453454
Implies :import, but if there is already an C<AUTOLOAD> defined, the
454-
overriding C<AUTOLOAD> will still give it a chance to run. See L<"STACKED
455+
overriding C<AUTOLOAD> will still give it a chance to run. See L<"STACKABLE
455456
AUTOLOADs">.
456457
457458
=head2 ANYTHING ELSE
@@ -743,7 +744,7 @@ sub xmlcmnt {
743744
return XML::Generator::comment->new([$xml]);
744745
}
745746

746-
=head2 xmldecl(@args)
747+
=head2 xmldecl (@args)
747748
748749
Declaration. This can be used to specify the version, encoding, and
749750
other XML-related declarations (i.e., anything inside the <?xml?> tag).
@@ -941,7 +942,7 @@ So, let's assume that we want to provide a custom HTML table() method:
941942
942943
sub table {
943944
my $self = shift;
944-
945+
945946
# parse our args to get namespace and attribute info
946947
my($namespace, $attr, @content) =
947948
$self->XML::Generator::util::parse_args(@_)
@@ -1554,6 +1555,11 @@ Modular rewrite to enable subclassing
15541555
15551556
=back
15561557
1558+
=head1 LICENSE
1559+
1560+
This library is free software, you can redistribute it and/or modify
1561+
it under the same terms as Perl itself.
1562+
15571563
=head1 SEE ALSO
15581564
15591565
=over 4

lib/XML/Generator/DOM.pm

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -37,9 +37,15 @@ method.
3737
Below, we just note the remaining differences in semantics between
3838
XML::Generator methods and XML::Generator::DOM methods.
3939
40+
=head1 LICENSE
41+
42+
This library is free software, you can redistribute it and/or modify
43+
it under the same terms as Perl itself.
44+
4045
=cut
4146

4247
use strict;
48+
use warnings;
4349
use Carp;
4450
use XML::Generator ();
4551
use base 'XML::Generator';

0 commit comments

Comments
 (0)