RT# 82988 - Fixed so only formats that can handle electronic refunds can download...

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

diff --git a/httemplate/search/pay_batch.cgi b/httemplate/search/pay_batch.cgi
index 40df5aa..8fe4351 100755 (executable)
--- a/httemplate/search/pay_batch.cgi
+++ b/httemplate/search/pay_batch.cgi
@@ -33,9 +33,11 @@
                                     ],
                 'align'         => 'rcllrrrrc',
                 'fields'        => [ 'batchnum',
-                                     sub { 
-                                       FS::payby->shortname(shift->payby);
-                                     },
+                                     sub {
+                my $self = shift;
+                my $type = $self->type eq 'CREDIT' ? 'CREDIT' : '';
+                $type ." " . FS::payby->shortname($self->payby);
+                                                 },
                                       sub {
                                        my $self = shift;
                                        my $_date = $self->download;