Oops. One too many entries.

davorg-cpan · Oct 14, 2009 · 4c7886f · 4c7886f
1 parent 4fb701c
commit 4c7886f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Perlanet.pm b/lib/Perlanet.pm
@@ -219,7 +219,7 @@ sub run {
 
   # Only need so many entries
   if (@entries > $self->cfg->{entries}) {
-    $#entries = $self->cfg->{entries};
+    $#entries = $self->cfg->{entries} - 1;
   }
 
   # Preferences for HTML::Tidy