[Bps-public-commit] r19718 - Net-Google-Code/trunk/lib/Net/Google/Code/Role

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Tue May 19 03:05:18 2009
New Revision: 19718

Modified:
   Net-Google-Code/trunk/lib/Net/Google/Code/Role/Pageable.pm

Log:
more loose check for the decorated column

Modified: Net-Google-Code/trunk/lib/Net/Google/Code/Role/Pageable.pm
==============================================================================
--- Net-Google-Code/trunk/lib/Net/Google/Code/Role/Pageable.pm	(original)
+++ Net-Google-Code/trunk/lib/Net/Google/Code/Role/Pageable.pm	Tue May 19 03:05:18 2009
@@ -116,7 +116,7 @@
         my $k = 0;
         for ( my $j = 0 ; $j < @tags ; $j++ ) {
             my $column = $tags[$j]->as_text;
-            next if $column eq "\x{203a}"; # skip the '›' thing
+            next unless $column =~ /[-\w]/; # skip the '›' thing or alike
 
             my @elements  = split /\x{a0}/, $column;
             for ( @elements ) {