fix link glitch in receivables reports

diff --git a/httemplate/search/report_receivables.cgi b/httemplate/search/report_receivables.cgi
index 535afcc..d675346 100755 (executable)
--- a/httemplate/search/report_receivables.cgi
+++ b/httemplate/search/report_receivables.cgi
@@ -121,6 +121,8 @@ END
   my $align = join('', map { /#/ ? 'r' : 'l' } FS::UI::Web::cust_header() ).
              'crrrrr';
 
+  my $clink = [ "${p}view/cust_main.cgi?", 'custnum' ];
+
 %><%= include( 'elements/search.html',
                  'title'       => 'Accounts Receivable Aging Summary',
                  'name'        => 'customers',
@@ -185,8 +187,7 @@ END
                                                    shift->get('owed_total') ) },
                                   ],
                  'links'       => [
-                                    [ "${p}view/cust_main.cgi?", 'custnum' ],
-                                    [ "${p}view/cust_main.cgi?", 'custnum' ],
+                                    ( map $clink, FS::UI::Web::cust_header() ),
                                     '',
                                     #'',
                                     '',