Index: /trunk/PS-IPP-MetaDB/lib/PS/IPP/MetaDB.pm
===================================================================
--- /trunk/PS-IPP-MetaDB/lib/PS/IPP/MetaDB.pm	(revision 5188)
+++ /trunk/PS-IPP-MetaDB/lib/PS/IPP/MetaDB.pm	(revision 5189)
@@ -1,5 +1,5 @@
 # Copyright (C) 2005  Joshua Hoblitt
 #
-# $Id: MetaDB.pm,v 1.4 2005-09-29 21:20:25 jhoblitt Exp $
+# $Id: MetaDB.pm,v 1.5 2005-09-29 22:11:27 jhoblitt Exp $
 
 package PS::IPP::MetaDB;
@@ -77,12 +77,23 @@
     my %p = @_;
 
+    my @rows;
     if (exists $p{exp_id}) {
-        PS::IPP::MetaDB::Image::New->search(
+        @rows = PS::IPP::MetaDB::Image::New->search(
             $p{exp_id},
             { order_by => 'class_id' },
         );
     } else {
-        PS::IPP::MetaDB::Image::New->retrieve_all;
+        @rows = PS::IPP::MetaDB::Image::New->retrieve_all;
     }
+
+    my @fields = qw( exp_id class_id camera class url );
+    my @result;
+    foreach my $obj (@rows) {
+        my %hash;
+        @hash{@fields} = $obj->get(@fields);
+        push(@result, \%hash);
+    }
+
+    return @result;
 }