improve customer field access in RT queries, #16490
[freeside.git] / rt / share / html / Search / Elements / ConditionRow
index fe21f4d..65e2176 100644 (file)
@@ -82,7 +82,8 @@ $handle_block = sub {
         my $res = '';
         $res .= qq{<select id="$name" name="$name">};
         my @options = @{ $box->{'Options'} };
-        while( my $k = shift @options ) {
+        while( @options ) {
+            my $k = shift @options;
             my $v = shift @options;
             $res .= qq{<option value="$k">$v</option>};
         }