From d6c6841fa3d12be92fb0b86837791023adc1cd5d Mon Sep 17 00:00:00 2001
From: Chad Perrin <code@apotheon.net>
Date: Sun, 12 Sep 2010 15:49:51 -0600
Subject: changed numeric iteration while to a for

--
user: Chad Perrin <code@apotheon.net>
branch 'default'
changed url-picker
---
 url-picker | 3 +--
 1 file changed, 1 insertion(+), 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];
-- 
cgit v1.2.3