[libxml-mini-perl] 01/02: Add patch to fix lintian warning spelling-error-in-manpage

[Axel Beckert]

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

abe pushed a commit to branch master
in repository libxml-mini-perl.

commit 127c099491cf250336b073186c60eedb02fb04e7
Author: Axel Beckert <abe at deuxchevaux.org>
Date:   Mon Jun 9 16:44:24 2014 +0200

    Add patch to fix lintian warning spelling-error-in-manpage
---
 debian/changelog                   |  1 +
 debian/patches/series              |  1 +
 debian/patches/spelling-fixes.diff | 48 ++++++++++++++++++++++++++++++++++++++
 3 files changed, 50 insertions(+)

diff --git a/debian/changelog b/debian/changelog
index 64971aa..e2bdf61 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -23,6 +23,7 @@ libxml-mini-perl (1.38-3) UNRELEASED; urgency=low
   * Also fixes the following lintian warnings:
     + debian-control-has-unusual-field-spacing
     + copyright-refers-to-symlink-license
+    + spelling-error-in-manpage (via new patch spelling-fixes.diff)
   * Add trailing slash to multiple URLs without path.
   * Change Homepage header to http://minixml.sourceforge.net/ as the
     previous homepage seems no more reachable.
diff --git a/debian/patches/series b/debian/patches/series
index d2dd8c3..64107eb 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -2,3 +2,4 @@ pod-fixes.diff
 header-attributes-sorting.diff
 fix-nested-nodes-parsing.diff
 fix-attribute-value-parsing.diff
+spelling-fixes.diff
diff --git a/debian/patches/spelling-fixes.diff b/debian/patches/spelling-fixes.diff
new file mode 100644
index 0000000..2d1b1c1
--- /dev/null
+++ b/debian/patches/spelling-fixes.diff
@@ -0,0 +1,48 @@
+Description: Fix lintian warning spelling-error-in-manpage
+Author: Axel Beckert <abe at debian.org>
+
+Index: libxml-mini-perl/lib/XML/Mini/Element.pm
+===================================================================
+--- libxml-mini-perl.orig/lib/XML/Mini/Element.pm	2014-06-09 16:02:13.449854039 +0200
++++ libxml-mini-perl/lib/XML/Mini/Element.pm	2014-06-09 16:40:55.237304323 +0200
+@@ -208,11 +208,11 @@
+     return $newElement;
+ }
+ 
+-# Note: the seperator parameter remains officially undocumented
++# Note: the separator parameter remains officially undocumented
+ # since I'm not sure it will remain part of the API
+ sub getValue {
+     my $self = shift;
+-    my $seperator = shift || ' ';
++    my $separator = shift || ' ';
+     
+     my @valArray;
+     my $retStr = '';
+@@ -228,7 +228,7 @@
+     
+     if (scalar @valArray)
+     {
+-	$retStr = join($seperator, @valArray);
++	$retStr = join($separator, @valArray);
+     }
+     
+     return $retStr;
+@@ -1002,7 +1002,7 @@
+ If SETTO is passed, the attribute's value is set to SETTO.
+ 
+ If the optional SETTOALT is passed and SETTO is false, the 
+-attribute's value is set to SETTOALT.  This is usefull in cases
++attribute's value is set to SETTOALT.  This is useful in cases
+ when you wish to set the attribute to a default value if no SETTO is
+ present, eg $myelement->attribute('href', $theHref, 'http://psychogenic.com')
+ will default to 'http://psychogenic.com'.
+@@ -1041,7 +1041,7 @@
+ new node's value is set to SETTOALT.  See the attribute() method
+ for an example use.
+ 
+-Returns a space seperated string composed all child XML::MiniNodes' 
++Returns a space separated string composed all child XML::MiniNodes' 
+ numeric contents.
+ 
+ Note: ONLY numerical contents are included from the list of child XML::MiniNodes.

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