From 55835ccfaffef48b924857e18bfd964aebda3a0a Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
Date: Fri, 13 Nov 2020 15:54:32 -0300
Subject: [PATCH] Bug 27021: Make chaining ->empty always return an empty
 resultset

This patch borrows the implementation Martin did on bug 27002, to
woraround this issue, and implements it properly on the
Koha::Objects->empty method.

To test:
1. Apply the regression tests patch
2. Run:
   $ kshell
  k$ prove t/db_dependent/Koha/Objects.t
=> FAIL: Tests fail! The resultset should be empty and it isn't!
3. Apply this patch
4. Repeat 2
=> SUCCESS: Tests pass!
5. Sign off!

Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: David Nind <david@davidnind.com>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
---
 Koha/Objects.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Koha/Objects.pm b/Koha/Objects.pm
index 3ea4727048..2f16b35888 100644
--- a/Koha/Objects.pm
+++ b/Koha/Objects.pm
@@ -377,6 +377,7 @@ sub empty {
         class  => $self
     ) unless ref $self;
 
+    $self = $self->search(\'0 = 1');
     $self->_resultset()->set_cache([]);
 
     return $self;