X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=fs_selfservice%2FFS-SelfService%2Fcgi%2Fselfservice.cgi;fp=fs_selfservice%2FFS-SelfService%2Fcgi%2Fselfservice.cgi;h=999b812d9fb8a7beee831522724d1c63516fd6a1;hp=3dc69e14231856f2c9bf28c462549ade054b651d;hb=2a82381a976c22f2c0d85645e8b327713ddcbd88;hpb=29445ff3f69c32ba0f836f3c5bbaf946c154b360 diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index 3dc69e142..999b812d9 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -284,7 +284,11 @@ sub change_bill { }; } sub change_ship { change_bill(@_); } -sub change_pay { change_bill(@_); } +sub change_pay { + my @payby = ('CARD', 'CHEK', 'DCHK'); + use MyLog; use Data::Dumper; MyLog->mylog("my change pay at\n".Dumper(@_)); + change_bill(@_); +} sub change_creditcard_pay { change_bill('CARD'); } sub change_check_pay { change_bill('CHEK'); }