Changeset 8341

Timestamp:

12/21/05 02:19:18 (3 years ago)

Author:

rafl

Message:

r23723@ata: rafl | 2005-12-19 19:12:40 +0100

• Some more comments on JIB::Repository.

Files:

• misc/sixpan/JIB/lib/JIB/Repository.pm (modified) (1 diff)

misc/sixpan/JIB/lib/JIB/Repository.pm

@@ -250 +250 @@
     my @index_files;
     my %copy = map { $_ => $_ ne $cur } @$groups;
-    my @copy = grep { $copy{$_} } keys %copy;
+    my @copy = grep { $copy{$_} } keys %copy; #all groups minus the current one
     for my $key (@copy) {
         my $path = dir($key)->subdir($pkg->meta->$key);
-        # maybe use another mechanism to call arbitrary stuff on the package obj?
+        # maybe use another mechanism to call arbitrary stuff on the package
+        # obj? otherwise all data we index after must be a toplevel element of
+        # the meta file
         push @index_files, file($path.'.index');
         push @index_files, map { $path->file($_) }