Index: /trunk/PS-IPP-MetaDB/scripts/mdb-find-new
===================================================================
--- /trunk/PS-IPP-MetaDB/scripts/mdb-find-new	(revision 5197)
+++ /trunk/PS-IPP-MetaDB/scripts/mdb-find-new	(revision 5198)
@@ -3,5 +3,5 @@
 # Copyright (C) 2005  Joshua Hoblitt
 #
-# $Id: mdb-find-new,v 1.2 2005-09-29 22:12:15 jhoblitt Exp $
+# $Id: mdb-find-new,v 1.3 2005-09-30 01:22:53 jhoblitt Exp $
 
 use strict;
@@ -17,5 +17,5 @@
 use Pod::Usage qw( pod2usage );
 
-my ($exp_id, $class_id, $url);
+my ($exp_id, $class, $class_id, $url);
 my ($dsn, $dbuser, $dbpass);
 
@@ -25,4 +25,5 @@
     'pass=s'    => \$dbpass,
     'exp_id=s'  => \$exp_id,
+    'class=s'   => \$class,
     'class_id=s'=> \$class_id,
 ) || pod2usage( 2 );
@@ -46,4 +47,5 @@
     @rows = PS::IPP::MetaDB->find_new(
         exp_id      => $exp_id,
+        class       => $class,
         class_id    => $class_id,
     );
@@ -52,5 +54,5 @@
 }
 
-my @fields = qw( exp_id class_id camera class url );
+my @fields = PS::IPP::MetaDB->new_fields; 
 my $csv = Text::CSV->new();