From 2cd8ba81799a017e9bbb54b61d0028d83dc38777 Mon Sep 17 00:00:00 2001
From: Jared Camins-Esakov <jcamins@cpbibliography.com>
Date: Sun, 9 Sep 2012 12:02:45 -0400
Subject: [PATCH] Superpage cannot be unset in QP core

Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
---
 Open-ILS/src/perlmods/lib/OpenILS/Application/Storage/QueryParser.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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};
 }
 
-- 
2.11.0