'addl_fields' => [ sub { time2str('%r', shift->_date ) },
$status_sub,
],
+ 'redirect_empty' => $redirect_empty,
)
%>
<%init>
$return. qq! <FONT SIZE="-1">($link)</FONT>!;
};
+my $redirect_empty = sub {
+ my $cgi = shift;
+ if ( $cgi->param('custnum') =~ /^(\d+)$/ ) {
+ $p. "view/cust_main.cgi?$1";
+ } else {
+ '';
+ }
+};
+
</%init>