From: miker Date: Tue, 15 Apr 2008 17:09:40 +0000 (+0000) Subject: fixing fielder with no fields X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=29af9e07938442a8ca632bf3e848e75d7032d5f3;p=Evergreen.git fixing fielder with no fields git-svn-id: svn://svn.open-ils.org/ILS/trunk@9364 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Fielder.pm b/Open-ILS/src/perlmods/OpenILS/Application/Fielder.pm index 3ca8ea6cd2..25d1343c06 100644 --- a/Open-ILS/src/perlmods/OpenILS/Application/Fielder.pm +++ b/Open-ILS/src/perlmods/OpenILS/Application/Fielder.pm @@ -61,8 +61,10 @@ sub fielder_fetch { my $query = $obj->{query}; my $fields = $obj->{fields}; + my $obj_class = $self->{class_hint}; + if (!$fields) { - $fields = [ $obj->real_fields ]; + $fields = [ "Fieldmapper::$obj_class"->real_fields ]; } $log->debug( 'Field list: '. OpenSRF::Utils::JSON->perl2JSON( $fields ) ); @@ -73,7 +75,6 @@ sub fielder_fetch { $fields = [$fields] if (!ref($fields)); - my $obj_class = $self->{class_hint}; $log->debug( 'Query Class: '. $obj_class );