From 31da5dde3920cefff7ec7855f42105e1bfc6d2ef Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Mon, 12 Nov 2018 09:42:51 -0800 Subject: [PATCH] fix fee deletion on v3, RT#81713 --- FS/FS/cust_event_fee.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/FS/FS/cust_event_fee.pm b/FS/FS/cust_event_fee.pm index 3e6dfc925..3d78f771f 100644 --- a/FS/FS/cust_event_fee.pm +++ b/FS/FS/cust_event_fee.pm @@ -275,9 +275,12 @@ sub join_sql { =item process_delete =cut - + +use Storable qw(thaw); +use MIME::Base64; sub process_delete { - my( $job, $param ) = @_; + my $job = shift; + my $param = thaw(decode_base64(shift)); my $search_sql = FS::cust_event_fee->search_sql_where($param); my $where = $search_sql ? " WHERE $search_sql" : ''; -- 2.20.1