From d01e39fb1dfe39717ddf7a7b0870a95ef433af41 Mon Sep 17 00:00:00 2001
From: Jonathan Prykop <jonathan@freeside.biz>
Date: Tue, 23 Feb 2016 09:30:59 -0600
Subject: [PATCH] RT#39586 Manual check refunds cannot be unapplied [v3 merge]

---
 FS/FS/cust_main/Billing_Realtime.pm | 2 --
 FS/FS/cust_refund.pm                | 1 -
 2 files changed, 3 deletions(-)

diff --git a/FS/FS/cust_main/Billing_Realtime.pm b/FS/FS/cust_main/Billing_Realtime.pm
index 58ae97ceb..e9a3db2fd 100644
--- a/FS/FS/cust_main/Billing_Realtime.pm
+++ b/FS/FS/cust_main/Billing_Realtime.pm
@@ -1382,8 +1382,6 @@ sub realtime_refund_bop {
     warn "  $_ => $options{$_}\n" foreach keys %options;
   }
 
-  return "No reason specified" unless $options{'reasonnum'} =~ /^\d+$/;
-
   my %content = ();
 
   ###
diff --git a/FS/FS/cust_refund.pm b/FS/FS/cust_refund.pm
index d6cedf54b..179151009 100644
--- a/FS/FS/cust_refund.pm
+++ b/FS/FS/cust_refund.pm
@@ -158,7 +158,6 @@ sub insert {
       $self->set('reasonnum', $reason->get('reasonnum'));
       $self->set('reason', '');
     }
-    $self->set('reasonnum', $reason->reasonnum);
   }
 
   if ( $self->crednum ) {
-- 
2.20.1