Changeset 20577 for gsdl/trunk/perllib/plugins/DirectoryPlugin.pm

Timestamp:

2009-09-10T10:50:05+12:00 (15 years ago)

Author:

davidb

Message:

Changes to support new incremental_mode variable, and to track metadata.xml files more closely so incremental building works when a document is first build without any metadata attached, then then in a subsequent build has metadata from such a source as metadata.xml added.

File:

• gsdl/trunk/perllib/plugins/DirectoryPlugin.pm (modified) (4 diffs)

gsdl/trunk/perllib/plugins/DirectoryPlugin.pm

@@ -148 +148 @@
 
 
-# called if we are doing incremental building
-sub set_incremental {
-    my $self = shift(@_);
-    my ($incremental) = @_;
-
-    $self->{'incremental'} = $incremental;
-}
 
 # return 1 if this class might recurse using $pluginfo
@@ -283 +276 @@
 
     $block_hash->{'all_files'} = {} unless defined $block_hash->{'all_files'};
+    $block_hash->{'metadata_files'} = {} unless defined $block_hash->{'metadata_files'};
 
     $block_hash->{'file_blocks'} = {} unless defined $block_hash->{'file_blocks'};
@@ -597 +591 @@
     }
 
-
     if (defined $self->{'inf_timestamp'}) {
         # Look to see if it's a completely new file
@@ -608 +601 @@
         if (! -d $full_filename) {
             if (!$block_hash->{'reindex_files'}->{$full_filename}) {
-            # filename has been around for longer than inf
+            # filename has been around for longer than inf_timestamp
             print $outhandle "**** Skipping $subfile\n" if ($verbosity >3);
             next;