add Excel and CSV download of templated reports and clean up their HTML formatting...

[freeside.git] / httemplate / search / cust_main.cgi

diff --git a/httemplate/search/cust_main.cgi b/httemplate/search/cust_main.cgi
index 8dd3899..a325667 100755 (executable)
--- a/httemplate/search/cust_main.cgi
+++ b/httemplate/search/cust_main.cgi
@@ -285,7 +285,7 @@ if ( scalar(@cust_main) == 1 && ! $cgi->param('referral_custnum') ) {
       or eidiot "Illegal referral_custnum\n";
     my $referral_custnum = $1;
     my $cust_main = qsearchs('cust_main', { custnum => $referral_custnum } );
-    print '<FORM METHOD=POST>'.
+    print '<FORM METHOD="GET">'.
           qq!<INPUT TYPE="hidden" NAME="referral_custnum" VALUE="$referral_custnum">!.
           'referrals of <A HREF="'. popurl(2).
           "view/cust_main.cgi?$referral_custnum\">$referral_custnum: ".
@@ -407,9 +407,9 @@ END
             my $num =
               FS::TicketSystem->num_customer_tickets($custnum,$priority);
             my $ahref = '';
-            $aref = '<A HREF="'.
+            $ahref= '<A HREF="'.
                     FS::TicketSystem->href_customer_tickets($custnum,$priority).
-                    '">';
+                    '">'
               if $num;
 
             print '<TR>'.
@@ -424,9 +424,9 @@ END
         }
 
         my $ahref = '';
-        my $ahref = '<A HREF="'.
+        $ahref = '<A HREF="'.
                     FS::TicketSystem->href_customer_tickets($custnum).
-                    '">';
+                    '">'
           if $cust_main->get($addl_col);
 
         print $ahref. $cust_main->get($addl_col). '</A>';