From 743a09e78017b7b03ed79dccb54accfa1b26c95f Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 9 Nov 2004 07:23:09 +0000
Subject: [PATCH] fixes to run under the mason strictness

---
 httemplate/search/report_tax.cgi | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/httemplate/search/report_tax.cgi b/httemplate/search/report_tax.cgi
index aa9ed6f11..e3d203eb3 100755
--- a/httemplate/search/report_tax.cgi
+++ b/httemplate/search/report_tax.cgi
@@ -42,7 +42,7 @@ my $gotcust = "
             )
 ";
 
-my($total, $exempt, $taxable, $tax) = ( 0, 0, 0, 0 );
+my($total, $exempt, $taxable, $owed, $tax) = ( 0, 0, 0, 0, 0 );
 my $out = 'Out of taxable region(s)';
 my %regions;
 foreach my $r (qsearch('cust_main_county', {}, '', $gotcust) ) {
@@ -153,7 +153,11 @@ push @regions, {
 
 sub getlabel {
   my $r = shift;
+
+  my $label;
   if ( $r->tax == 0 ) {
+    #kludge to avoid "will not stay shared" warning
+    my $out = 'Out of taxable region(s)';
     $label = $out;
   } elsif ( $r->taxname ) {
     $label = $r->taxname;
-- 
2.11.0