From: Jared Camins-Esakov <jcamins@cpbibliography.com>
Date: Sun, 9 Sep 2012 16:02:45 +0000 (-0400)
Subject: Superpage cannot be unset in QP core
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=2cd8ba81799a017e9bbb54b61d0028d83dc38777;p=working%2FEvergreen.git

Superpage cannot be unset in QP core

Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/QueryParser.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/QueryParser.pm
index f5e86739f4..ed903842bf 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/QueryParser.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/QueryParser.pm
@@ -1149,7 +1149,7 @@ Return and/or set the superpage.
 sub superpage {
     my $self = shift;
     my $l = shift;
-    $self->{superpage} = $l if ($l);
+    $self->{superpage} = $l if (defined($l));
     return $self->{superpage};
 }