r74910 - in /branches/upstream/libtest-spelling-perl/current: Changes META.yml README lib/Test/Spelling.pm

[periapt-guest at users.alioth.debian.org]

Author: periapt-guest
Date: Fri May 27 20:18:43 2011
New Revision: 74910

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=74910
Log:
[svn-upgrade] new version libtest-spelling-perl (0.14)

Modified:
    branches/upstream/libtest-spelling-perl/current/Changes
    branches/upstream/libtest-spelling-perl/current/META.yml
    branches/upstream/libtest-spelling-perl/current/README
    branches/upstream/libtest-spelling-perl/current/lib/Test/Spelling.pm

Modified: branches/upstream/libtest-spelling-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-spelling-perl/current/Changes?rev=74910&op=diff
==============================================================================
--- branches/upstream/libtest-spelling-perl/current/Changes (original)
+++ branches/upstream/libtest-spelling-perl/current/Changes Fri May 27 20:18:43 2011
@@ -1,4 +1,8 @@
 Revision history for Test-Spelling
+
+0.14  2011-05-27
+        - Fix an error when using add_stopwords("constant", "strings")
+          [rt.cpan.org #68471] (reported by Nicholas Bamber)
 
 0.13  2011-04-27
         - Make alternatives checking more robust by reading the spellchecker's

Modified: branches/upstream/libtest-spelling-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-spelling-perl/current/META.yml?rev=74910&op=diff
==============================================================================
--- branches/upstream/libtest-spelling-perl/current/META.yml (original)
+++ branches/upstream/libtest-spelling-perl/current/META.yml Fri May 27 20:18:43 2011
@@ -23,4 +23,4 @@
 resources:
   license: http://dev.perl.org/licenses/
   repository: http://github.com/bestpractical/test-spelling
-version: 0.13
+version: 0.14

Modified: branches/upstream/libtest-spelling-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-spelling-perl/current/README?rev=74910&op=diff
==============================================================================
--- branches/upstream/libtest-spelling-perl/current/README (original)
+++ branches/upstream/libtest-spelling-perl/current/README Fri May 27 20:18:43 2011
@@ -69,12 +69,8 @@
     "has_working_spellchecker"), this test will issue a "skip all"
     directive.
 
-    If you're testing a distribution, just create a t/pod-spell.t:
-
-        use Test::More;
-        plan skip_all => "Spelling tests only for authors" unless -d "inc/.author";
-        use Test::Spelling;
-        all_pod_files_spelling_ok();
+    If you're testing a distribution, just create a t/pod-spell.t with the
+    code in the "SYNOPSIS".
 
     Returns true if every POD file has correct spelling, or false if any of
     them fail. This function will show any spelling errors as diagnostics.

Modified: branches/upstream/libtest-spelling-perl/current/lib/Test/Spelling.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-spelling-perl/current/lib/Test/Spelling.pm?rev=74910&op=diff
==============================================================================
--- branches/upstream/libtest-spelling-perl/current/lib/Test/Spelling.pm (original)
+++ branches/upstream/libtest-spelling-perl/current/lib/Test/Spelling.pm Fri May 27 20:18:43 2011
@@ -10,7 +10,7 @@
 use IPC::Open3;
 use Symbol 'gensym';
 
-our $VERSION = '0.13';
+our $VERSION = '0.14';
 
 our @EXPORT = qw(
     pod_file_spelling_ok
@@ -216,7 +216,10 @@
 }
 
 sub add_stopwords {
-    for my $word (@_) {
+    for (@_) {
+        # explicit copy so we don't modify constants as in add_stopwords("SQLite")
+        my $word = $_;
+
         # XXX: the processing this performs is to support "perl t/spell.t 2>>
         # t/spell.t" which is bunk. in the near future the processing here will
         # become more modern