grr - fix agentnum passing
authorjeff <jeff>
Thu, 8 Jul 2010 03:25:19 +0000 (03:25 +0000)
committerjeff <jeff>
Thu, 8 Jul 2010 03:25:19 +0000 (03:25 +0000)
FS/FS/tax_rate.pm

index 04780da..e2e2e8b 100644 (file)
@@ -1773,7 +1773,7 @@ sub queue_liability_report {
   $cgi->param('ending', $param->{ending});
   my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi);
   my $agentnum = $param->{agentnum};
-  $agentnum =~ /^(\d+)$/ ? $agentnum = $1 : $agentnum = '';
+  if ($agentnum =~ /^(\d+)$/) { $agentnum = $1; } else { $agentnum = ''; };
   generate_liability_report(
     'beginning' => $beginning,
     'ending'    => $ending,