[vhffs-dev] [511] Fixed typo and removed some fetch

[subversion@xxxxxxxxx]

Revision: 511
Author:   beuss
Date:     2007-03-19 13:09:35 +0000 (Mon, 19 Mar 2007)

Log Message:
-----------
Fixed typo and removed some fetch

Modified Paths:
--------------
    branches/vhffs_4.1/vhffs-api/src/Vhffs/Services/Svn.pm


Modified: branches/vhffs_4.1/vhffs-api/src/Vhffs/Services/Svn.pm
===================================================================
--- branches/vhffs_4.1/vhffs-api/src/Vhffs/Services/Svn.pm	2007-03-17 23:55:26 UTC (rev 510)
+++ branches/vhffs_4.1/vhffs-api/src/Vhffs/Services/Svn.pm	2007-03-19 13:09:35 UTC (rev 511)
@@ -105,7 +105,7 @@
 {
     if($_[0]->isa('Vhffs::Services::Svn')) {
         my ($package, $file, $line) = caller();
-        warn "Using deprecated form of method Vhffs::Svn::Repository::create from $package ($file:$line)\n";
+        warn "Using deprecated form of method Vhffs::Svn::create from $package ($file:$line)\n";
         return old_create(@_);
     }
     my ($main, $rname, $description, $user, $group) = @_;
@@ -113,7 +113,7 @@
     return undef unless(defined($user) && defined($group));
     return undef unless(check_name($rname));
 
-    my $parent = Vhffs::Object::create($main, $user->get_uid, $description);
+    my $parent = Vhffs::Object::create($main, $user->get_uid, $description, undef, Vhffs::Constants::TYPE_SVN);
 
     return undef unless(defined $parent);
 
@@ -133,8 +133,8 @@
     my $self = shift;
     
    
-    return -2 if ( !defined $self->{'user'} || $self->{'user'}->fetch < 0 );
-    return -3 if ( !defined $self->{'group'} || $self->{'group'}->fetch < 0 );
+    return -2 if ( !defined $self->{'user'}  );
+    return -3 if ( !defined $self->{'group'} );
 
 
     my $request = $self->{'db'}->prepare("SELECT * FROM vhffs_svn WHERE reponame='" . $self->{'reponame'} ."' AND owner_gid='".$self->{'group'}->get_gid."'");