Index: /trunk/DataStore/lib/DataStore/File.pm
===================================================================
--- /trunk/DataStore/lib/DataStore/File.pm	(revision 6607)
+++ /trunk/DataStore/lib/DataStore/File.pm	(revision 6608)
@@ -1,5 +1,5 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: File.pm,v 1.7 2006-03-16 21:44:58 jhoblitt Exp $
+# $Id: File.pm,v 1.8 2006-03-16 21:57:29 jhoblitt Exp $
 
 package DataStore::File;
@@ -112,8 +112,8 @@
     my $class = shift;
 
-    # validates uri, ignores other params
+    # validates uri, doesn't check other params
     my $self = $class->SUPER::new(@_);
 
-    my %p = validate(@_,
+    validate(@_,
         {
             uri             => {
@@ -130,9 +130,4 @@
         },
     );
-
-    $self->{fileid} = $p{fileid};
-    $self->{bytes}  = $p{bytes};
-    $self->{md5sum} = $p{md5sum};
-    $self->{type}   = $p{type};
 
     return $self;
Index: /trunk/DataStore/lib/DataStore/FileSet.pm
===================================================================
--- /trunk/DataStore/lib/DataStore/FileSet.pm	(revision 6607)
+++ /trunk/DataStore/lib/DataStore/FileSet.pm	(revision 6608)
@@ -1,5 +1,5 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: FileSet.pm,v 1.5 2006-03-16 21:44:58 jhoblitt Exp $
+# $Id: FileSet.pm,v 1.6 2006-03-16 21:57:29 jhoblitt Exp $
 
 package DataStore::FileSet;
@@ -104,8 +104,8 @@
     my $class = shift;
 
-    # validates uri, ignores other params
+    # validates uri, doesn't check other params
     my $self = $class->SUPER::new(@_);
 
-    my %p = validate(@_,
+    validate(@_,
         {
             uri             => {
@@ -121,8 +121,4 @@
         },
     );
-
-    $self->{fileset}    = $p{fileset};
-    $self->{datetime}   = $p{datetime};
-    $self->{type}       = $p{type};
 
     return $self;
Index: /trunk/DataStore/lib/DataStore/Product.pm
===================================================================
--- /trunk/DataStore/lib/DataStore/Product.pm	(revision 6607)
+++ /trunk/DataStore/lib/DataStore/Product.pm	(revision 6608)
@@ -1,5 +1,5 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: Product.pm,v 1.5 2006-03-16 21:44:58 jhoblitt Exp $
+# $Id: Product.pm,v 1.6 2006-03-16 21:57:29 jhoblitt Exp $
 
 package DataStore::Product;
@@ -95,8 +95,8 @@
     my $class = shift;
 
-    # validates uri, ignores other params
+    # validates uri, doesn't check other params
     my $self = $class->SUPER::new(@_);
 
-    my %p = validate(@_,
+    validate(@_,
         {
             uri             => {
@@ -116,6 +116,4 @@
         },
     );
-
-    $self->{last_fileset} = $p{last_fileset};
 
     return $self;
Index: /trunk/DataStore/lib/DataStore/Record.pm
===================================================================
--- /trunk/DataStore/lib/DataStore/Record.pm	(revision 6607)
+++ /trunk/DataStore/lib/DataStore/Record.pm	(revision 6608)
@@ -1,5 +1,5 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: Record.pm,v 1.5 2006-03-16 21:44:58 jhoblitt Exp $
+# $Id: Record.pm,v 1.6 2006-03-16 21:57:29 jhoblitt Exp $
 
 package DataStore::Record;
@@ -69,5 +69,5 @@
     );
 
-    my $self = bless { uri => $p{uri} }, ref $class || $class;
+    my $self = bless \%p, ref $class || $class;
 
     return $self;