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

index b375a66..ba3691c 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,