Backport r12770 from trunk: Accomodate PostgreSQL 8.3's type strictness
authordbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 3 Apr 2009 05:53:35 +0000 (05:53 +0000)
committerdbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 3 Apr 2009 05:53:35 +0000 (05:53 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4@12771 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/cgi-bin/lib-setup.cgi

index 502d26a..f93455c 100755 (executable)
@@ -200,7 +200,7 @@ for my $lib ( actor::org_unit->search( {parent_ou=>undef} ) ) {
        last;
 }
 
-for my $lib ( actor::org_unit->search_like( {parent_ou => '%'}, {order_by => 'name'} ) ) {
+for my $lib ( actor::org_unit->search_where ( {parent_ou => { '>' => -1 } }, {order_by => 'name'} ) ) {
        my $name = $lib->name;
        $name =~ s/'/\\'/og;
        my $parent = $lib->parent_ou;