changed numeric iteration while to a for

--
user: Chad Perrin <code@apotheon.net>
branch 'default'
changed url-picker

1 files changed, 1 insertions, 2 deletions

diff --git a/url-picker b/url-picker
index 5adb193..7c52855 100644
--- a/url-picker
+++ b/url-picker
@@ -19,9 +19,8 @@ sub on_user_command {
   if ($cmd =~ s/^url-picker\b//) {
     my $labels = {}; 
     my $hrefs = {};
-    my $row = -1;
     my $num = 0;
-    while ($row++ < $self->nrow) {
+    for my $row (0..$self->nrow) {
       my $text = $self->ROW_t($row);
       while ($text =~ /$url/g) {
         my $col = $-[0];