From 926e97b9e94fede770c55e01c042b157ce9c22af Mon Sep 17 00:00:00 2001
From: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Date: Mon, 19 Jan 2015 15:05:03 +0100
Subject: [PATCH] Bug 13418: [QA Follow-up] Use unshift instead of push

Some SQL parameters are added to the wrong side of the list.
This effectively clears all private lists from view :)

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
---
 C4/VirtualShelves.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C4/VirtualShelves.pm b/C4/VirtualShelves.pm
index 24ee6dd7b9..0ae93615c6 100644
--- a/C4/VirtualShelves.pm
+++ b/C4/VirtualShelves.pm
@@ -111,7 +111,7 @@ sub GetShelves {
             LEFT JOIN virtualshelfshares sh ON sh.shelfnumber=vs.shelfnumber
             AND sh.borrowernumber=?
         WHERE category=1 AND (vs.owner=? OR sh.borrowernumber=?) };
-        push @params, ($owner) x 3;
+        unshift @params, ($owner) x 3;
     }
     else {
         $query.= 'WHERE category=2 ';
-- 
2.39.5