Changeset 24950

Timestamp:

2012-01-16T15:27:58+13:00 (12 years ago)

Author:

sjm84

Message:

Fixed use of null instead of undef

File:

• main/trunk/greenstone2/perllib/cgiactions/metadataaction.pm (modified) (1 diff)

main/trunk/greenstone2/perllib/cgiactions/metadataaction.pm

@@ -878 +878 @@
     my $import_filename = $doc_rec->{'doc-file'}->[0];  
 
-    my $status = $self->remove_from_doc_xml($gsdl_cgi, &util::filename_cat($archive_dir, $import_filename), $metaname, $metapos, null, $docid_secnum);
+    my $status = $self->remove_from_doc_xml($gsdl_cgi, &util::filename_cat($archive_dir, $import_filename), $metaname, $metapos, undef, $docid_secnum);
     
     # Release the lock once it is done