This is an automated email from the git hooks/post-receive script.

gregoa pushed a commit to branch master
in repository libdata-perl-perl.

commit de9ec6f123f79be6b05cc2f3405920c55a836b70
Author: gregor herrmann <gre...@debian.org>
Date:   Thu Jun 26 19:50:24 2014 +0200

    Add patch to fix POD syntax errors.
---
 debian/patches/pod-syntax.patch | 397 ++++++++++++++++++++++++++++++++++++++++
 debian/patches/series           |   1 +
 2 files changed, 398 insertions(+)

diff --git a/debian/patches/pod-syntax.patch b/debian/patches/pod-syntax.patch
new file mode 100644
index 0000000..7b957ce
--- /dev/null
+++ b/debian/patches/pod-syntax.patch
@@ -0,0 +1,397 @@
+Description: fix a recurrent POD syntax error:
+ 'Expected text after =item, not a bullet'
+Origin: vendor
+Author: gregor herrmann <gre...@debian.org>
+Last-Update: 2014-06-26
+Forwarded: https://github.com/mattp-/Data-Perl/issues/5
+
+--- a/lib/Data/Perl/Role/Bool.pm
++++ b/lib/Data/Perl/Role/Bool.pm
+@@ -55,21 +55,21 @@
+ Constructs a new Data::Perl::Collection::Bool object initialized with the 
passed
+ in value, and returns it.
+ 
+-=item * B<set>
++=item B<set>
+ 
+ Sets the value to C<1> and returns C<1>.
+ 
+-=item * B<unset>
++=item B<unset>
+ 
+ Set the value to C<0> and returns C<0>.
+ 
+-=item * B<toggle>
++=item B<toggle>
+ 
+ Toggles the value. If it's true, set to false, and vice versa.
+ 
+ Returns the new value.
+ 
+-=item * B<not>
++=item B<not>
+ 
+ Equivalent of 'not C<$value>'.
+ 
+--- a/lib/Data/Perl/Role/Code.pm
++++ b/lib/Data/Perl/Role/Code.pm
+@@ -48,11 +48,11 @@
+ Constructs a new Data::Perl::Code object, initialized to $coderef as passed 
in,
+ and returns it.
+ 
+-=item * B<execute(@args)>
++=item B<execute(@args)>
+ 
+ Calls the coderef with the given args.
+ 
+-=item * B<execute_method(@args)>
++=item B<execute_method(@args)>
+ 
+ Calls the coderef with the the instance as invocant and given args. B<This is
+ currently disabled and triggers a die due to implementation details yet to be
+--- a/lib/Data/Perl/Role/Collection/Array.pm
++++ b/lib/Data/Perl/Role/Collection/Array.pm
+@@ -224,7 +224,7 @@
+ Constructs a new Data::Perl::Collection::Array object initialized with passed
+ in values, and returns it.
+ 
+-=item * B<count>
++=item B<count>
+ 
+ Returns the number of elements in the array.
+ 
+@@ -234,7 +234,7 @@
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<is_empty>
++=item B<is_empty>
+ 
+ Returns a boolean value that is true when the array has no elements.
+ 
+@@ -242,7 +242,7 @@
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<elements/all>
++=item B<elements/all>
+ 
+ Returns all of the elements of the array as an array (not an array reference).
+ 
+@@ -251,7 +251,7 @@
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<get($index)>
++=item B<get($index)>
+ 
+ Returns an element of the array by its index. You can also use negative index
+ numbers, just as with Perl's core array handling.
+@@ -263,33 +263,33 @@
+ 
+ This method accepts just one argument.
+ 
+-=item * B<pop>
++=item B<pop>
+ 
+ Just like Perl's builtin C<pop>.
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<push($value1, $value2, value3 ...)>
++=item B<push($value1, $value2, value3 ...)>
+ 
+ Just like Perl's builtin C<push>. Returns the number of elements in the new
+ array.
+ 
+ This method accepts any number of arguments.
+ 
+-=item * B<shift>
++=item B<shift>
+ 
+ Just like Perl's builtin C<shift>.
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<unshift($value1, $value2, value3 ...)>
++=item B<unshift($value1, $value2, value3 ...)>
+ 
+ Just like Perl's builtin C<unshift>. Returns the number of elements in the new
+ array.
+ 
+ This method accepts any number of arguments.
+ 
+-=item * B<splice($offset, $length, @values)>
++=item B<splice($offset, $length, @values)>
+ 
+ Just like Perl's builtin C<splice>. In scalar context, this returns the last
+ element removed, or C<undef> if no elements were removed. In list context, 
this
+@@ -298,7 +298,7 @@
+ 
+ This method requires at least one argument.
+ 
+-=item * B<first( sub { ... } )>
++=item B<first( sub { ... } )>
+ 
+ This method returns the first matching item in the array, just like
+ L<List::Util>'s C<first> function. The matching is done with a subroutine
+@@ -310,7 +310,7 @@
+ 
+ This method requires a single argument.
+ 
+-=item * B<first_index( sub { ... } )>
++=item B<first_index( sub { ... } )>
+ 
+ This method returns the index of the first matching item in the array, just
+ like L<List::MoreUtils>'s C<first_index> function. The matching is done with a
+@@ -320,7 +320,7 @@
+ 
+ This method requires a single argument.
+ 
+-=item * B<grep( sub { ... } )>
++=item B<grep( sub { ... } )>
+ 
+ This method returns every element matching a given criteria, just like Perl's
+ core C<grep> function. This method requires a subroutine which implements the
+@@ -331,7 +331,7 @@
+ 
+ This method requires a single argument.
+ 
+-=item * B<map( sub { ... } )>
++=item B<map( sub { ... } )>
+ 
+ This method transforms every element in the array and returns a new array, 
just
+ like Perl's core C<map> function. This method requires a subroutine which
+@@ -343,7 +343,7 @@
+ 
+ This method requires a single argument.
+ 
+-=item * B<reduce( sub { ... } )>
++=item B<reduce( sub { ... } )>
+ 
+ This method turns an array into a single value, by passing a function the
+ value so far and the next value in the array, just like L<List::Util>'s
+@@ -355,9 +355,9 @@
+ 
+ This method requires a single argument.
+ 
+-=item * B<sort>
++=item B<sort>
+ 
+-=item * B<sort( sub { ... } )>
++=item B<sort( sub { ... } )>
+ 
+ Returns the elements of the array in sorted order.
+ 
+@@ -375,9 +375,9 @@
+ 
+ This method accepts a single argument.
+ 
+-=item * B<sort_in_place>
++=item B<sort_in_place>
+ 
+-=item * B<sort_in_place( sub { ... } )>
++=item B<sort_in_place( sub { ... } )>
+ 
+ Sorts the array I<in place>, modifying the value of the attribute.
+ 
+@@ -388,28 +388,28 @@
+ 
+ This method accepts a single argument.
+ 
+-=item * B<reverse>
++=item B<reverse>
+ 
+ Returns the elements of the array in reversed order. The returned list is
+ provided as a Collection::Array object.
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<shuffle>
++=item B<shuffle>
+ 
+ Returns the elements of the array in random order, like C<shuffle> from
+ L<List::Util>. The returned list is provided as a Collection::Array object.
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<uniq>
++=item B<uniq>
+ 
+ Returns the array with all duplicate elements removed, like C<uniq> from
+ L<List::MoreUtils>. The returned list is provided as a Collection::Array 
object.
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<join($str)>
++=item B<join($str)>
+ 
+ Joins every element of the array using the separator given as argument, just
+ like Perl's core C<join> function.
+@@ -419,14 +419,14 @@
+ 
+ This method requires a single argument.
+ 
+-=item * B<print($handle, $str)>
++=item B<print($handle, $str)>
+ 
+ Prints the output of join($str) to $handle. $handle defaults to STDOUT, and
+ join $str defaults to join()'s default of ','.
+ 
+   $joined = $stuff->print(*STDERR, ';'); # prints foo;bar;baz to STDERR
+ 
+-=item * B<set($index, $value)>
++=item B<set($index, $value)>
+ 
+ Given an index and a value, sets the specified array element's value.
+ 
+@@ -434,7 +434,7 @@
+ 
+ This method requires two arguments.
+ 
+-=item * B<delete($index)>
++=item B<delete($index)>
+ 
+ Removes the element at the given index from the array.
+ 
+@@ -445,7 +445,7 @@
+ 
+ This method requires one argument.
+ 
+-=item * B<insert($index, $value)>
++=item B<insert($index, $value)>
+ 
+ Inserts a new element into the array at the given index.
+ 
+@@ -454,7 +454,7 @@
+ 
+ This method requires two arguments.
+ 
+-=item * B<clear>
++=item B<clear>
+ 
+ Empties the entire array, like C<@array = ()>.
+ 
+@@ -462,9 +462,9 @@
+ 
+ This method does not accept any arguments.
+ 
+-=item * B<accessor($index)>
++=item B<accessor($index)>
+ 
+-=item * B<accessor($index, $value)>
++=item B<accessor($index, $value)>
+ 
+ This method provides a get/set accessor for the array, based on array indexes.
+ If passed one argument, it returns the value at the specified index.  If
+@@ -474,9 +474,9 @@
+ 
+ This method accepts one or two arguments.
+ 
+-=item * B<natatime($n)>
++=item B<natatime($n)>
+ 
+-=item * B<natatime($n, $code)>
++=item B<natatime($n, $code)>
+ 
+ This method returns an iterator which, on each call, returns C<$n> more items
+ from the array, in order, like C<natatime> from L<List::MoreUtils>. A coderef
+@@ -485,19 +485,19 @@
+ 
+ This method accepts one or two arguments.
+ 
+-=item * B<shallow_clone>
++=item B<shallow_clone>
+ 
+ This method returns a shallow clone of the array reference.  The return value
+ is a reference to a new array with the same elements.  It is I<shallow>
+ because any elements that were references in the original will be the I<same>
+ references in the clone.
+ 
+-=item * B<flatten>
++=item B<flatten>
+ 
+ This method returns a list of elements in the array.  This method is an alias
+ to the I<elements> method.
+ 
+-=item * B<flatten_deep($level)>
++=item B<flatten_deep($level)>
+ 
+ This method returns a flattened list of elements in the array. Will flatten
+ arrays contained within the root array recursively - depth is controlled by 
the
+--- a/lib/Data/Perl/Role/Counter.pm
++++ b/lib/Data/Perl/Role/Counter.pm
+@@ -51,31 +51,31 @@
+ Constructs a new Data::Perl::Collection::Counter object initialized with the 
passed
+ in value, and returns it.
+ 
+-=item * B<set($value)>
++=item B<set($value)>
+ 
+ Sets the counter to the specified value and returns the new value.
+ 
+ This method requires a single argument.
+ 
+-=item * B<inc>
++=item B<inc>
+ 
+-=item * B<inc($arg)>
++=item B<inc($arg)>
+ 
+ Increases the attribute value by the amount of the argument, or by 1 if no
+ argument is given. This method returns the new value.
+ 
+ This method accepts a single argument.
+ 
+-=item * B<dec>
++=item B<dec>
+ 
+-=item * B<dec($arg)>
++=item B<dec($arg)>
+ 
+ Decreases the attribute value by the amount of the argument, or by 1 if no
+ argument is given. This method returns the new value.
+ 
+ This method accepts a single argument.
+ 
+-=item * B<reset>
++=item B<reset>
+ 
+ Resets the value stored in this slot to its default value, and returns the new
+ value.
+--- a/lib/Data/Perl/Role/Number.pm
++++ b/lib/Data/Perl/Role/Number.pm
+@@ -60,27 +60,27 @@
+ Constructs a new Data::Perl::Collection::Number object initialized with the 
passed
+ in value, and returns it.
+ 
+-=item * B<add($value)>
++=item B<add($value)>
+ 
+ Adds the current value of the attribute to C<$value>.
+ 
+-=item * B<sub($value)>
++=item B<sub($value)>
+ 
+ Subtracts C<$value> from the current value of the attribute.
+ 
+-=item * B<mul($value)>
++=item B<mul($value)>
+ 
+ Multiplies the current value of the attribute by C<$value>.
+ 
+-=item * B<div($value)>
++=item B<div($value)>
+ 
+ Divides the current value of the attribute by C<$value>.
+ 
+-=item * B<mod($value)>
++=item B<mod($value)>
+ 
+ Returns the current value of the attribute modulo C<$value>.
+ 
+-=item * B<abs>
++=item B<abs>
+ 
+ Sets the current value of the attribute to its absolute value.
+ 
diff --git a/debian/patches/series b/debian/patches/series
new file mode 100644
index 0000000..c30ca3c
--- /dev/null
+++ b/debian/patches/series
@@ -0,0 +1 @@
+pod-syntax.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/pkg-perl/packages/libdata-perl-perl.git

_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits

Reply via email to