From 93b6b1b81a88b63b06b2833e9448880589899fb0 Mon Sep 17 00:00:00 2001
From: Kyle M Hall <kyle@bywatersolutions.com>
Date: Mon, 25 Sep 2023 10:11:03 -0400
Subject: [PATCH] Bug 22873: Add comment to explain what disallow_overpayment
 is for

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
(cherry picked from commit 075876fe0530258eaa22c0a24e7f472896232d9d)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
(cherry picked from commit b4fc27770dd03dd0077d0bcedea7e410d4bf8fdb)
Signed-off-by: Matt Blenkinsop <matt.blenkinsop@ptfs-europe.com>
---
 C4/SIP/ILS/Transaction/FeePayment.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/C4/SIP/ILS/Transaction/FeePayment.pm b/C4/SIP/ILS/Transaction/FeePayment.pm
index a9fae17da9..2e5b3364b5 100644
--- a/C4/SIP/ILS/Transaction/FeePayment.pm
+++ b/C4/SIP/ILS/Transaction/FeePayment.pm
@@ -55,6 +55,7 @@ sub pay {
 
     my $account = Koha::Account->new( { patron_id => $borrowernumber } );
 
+    # Bug 16899: Add ability to disallow overpayments for SIP
     if ($disallow_overpayment) {
         return { ok => 0 } if $account->balance < $amt;
     }
-- 
2.39.5