Changeset 9376

Timestamp:

2005-03-10T14:12:43+13:00 (19 years ago)

Author:

davidb

Message:

Fault in "combining" saved_metadata and metadata.xml when saved_metadata
is empty. Now fixed.

File:

• trunk/gsdl/perllib/plugins/RecPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/RecPlug.pm

@@ -482 +482 @@
         my $file_metadata = $self->{'metadataref'}->{$target};
         my $saved_metadata = $self->{'saved_metadata'};
-        $self->combine_metadata_structures($file_metadata,$saved_metadata);
+        if (!defined $file_metadata) {
+        $self->{'metadataref'}->{$target} = $saved_metadata;
+        }
+        else {
+        $self->combine_metadata_structures($file_metadata,$saved_metadata);
+        }
     }
     }