Changeset 10549

Timestamp:

2005-08-22T12:54:37+12:00 (19 years ago)

Author:

chi

Message:

Modifications to deal with the "dc value" without qualifier.

File:

• trunk/gsdl/perllib/plugins/DSpacePlug.pm (modified) (2 diffs)

trunk/gsdl/perllib/plugins/DSpacePlug.pm

@@ +1 @@
+
 ###########################################################################
 #
@@ -361 +362 @@
     } elsif ($element eq "dcvalue") {
     my $metaname = $_{'element'};
-    my $qualifier = $_{'qualifier'};
+    my $qualifier = $_{'qualifier'}||"";
     if ($metaname ne "description") {
         $metaname .= "^$qualifier" if ($qualifier ne "none" && $qualifier ne "");