Need to start the arrayref out right
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 15 Sep 2010 20:33:53 +0000 (20:33 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 15 Sep 2010 20:33:53 +0000 (20:33 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@17710 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Search/Serial.pm

index cd1d48a..06d2f63 100644 (file)
@@ -112,7 +112,7 @@ Given a bib record ID, returns a hash of holdings statements
 sub bib_to_svr {
        my ($self, $client, $bib) = @_;
        
-       my $svrs;
+       my $svrs = [];
 
        my $e = OpenILS::Utils::CStoreEditor->new();
     # TODO: 'deleted' ssub support