editor returns an array
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 14 Apr 2008 13:51:53 +0000 (13:51 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 14 Apr 2008 13:51:53 +0000 (13:51 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@9340 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Fielder.pm

index ed20506..32e0a18 100644 (file)
@@ -73,14 +73,14 @@ sub fielder_fetch {
 
     $log->debug( 'Query Class: '. $obj_class );
 
-    my $req = new_editor()->json_query({
+    my $res = new_editor()->json_query({
         select  => { $obj_class => $fields },
         from    => $obj_class,
         where   => $query
     });
 
-    while (my $res = $req->recv) {
-        $client->respond($res->content);
+    for my $value (@$res) {
+        $client->respond($value);
     }
 
     return undef;