Update of /cvsroot/fink/scripts/buildfink/lib/FinkFDB
In directory sc8-pr-cvs5.sourceforge.net:/tmp/cvs-serv20675/lib/FinkFDB

Modified Files:
        DBI.pm 
Log Message:
Don't create extra level under /

Index: DBI.pm
===================================================================
RCS file: /cvsroot/fink/scripts/buildfink/lib/FinkFDB/DBI.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -d -r1.7 -r1.8
--- DBI.pm      5 Apr 2007 02:41:21 -0000       1.7
+++ DBI.pm      8 Apr 2007 18:03:30 -0000       1.8
@@ -136,7 +136,10 @@
   $self->{queries}->{get_package_id}->finish();
 
   my $fileroot = $self->makeFileHierarchy($package, $files);
-  $self->addFileTree($package_id, $fileroot, 0);
+  foreach my $subfile (keys %$fileroot) {
+    next if $subfile eq "." or $subfile eq ".." or $subfile eq "/versions/" or 
$subfile eq "/path/";
+    $self->addFileTree($package_id, $fileroot->{$subfile}, $0);
+  }
   $self->{dbh}->commit();
 }
 


-------------------------------------------------------------------------
Take Surveys. Earn Cash. Influence the Future of IT
Join SourceForge.net's Techsay panel and you'll get the chance to share your
opinions on IT & business topics through brief surveys-and earn cash
http://www.techsay.com/default.php?page=join.php&p=sourceforge&CID=DEVDEV
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to