Changeset 20935
- Timestamp:
- 2009-11-13T10:02:48+13:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/cgiactions/metadataaction.pm
r20538 r20935 686 686 my $metadata_xml_file; 687 687 688 my $import_filename = undef; 689 688 690 if (defined $docid) { 689 691 … … 693 695 my $doc_rec = GDBMUtils::gdbmRecordToHash($arcinfo_doc_filename,$docid); 694 696 695 $import_file = $doc_rec->{'src-file'}->[0];696 } 697 698 699 my$import_filename = &util::filename_cat($collect_dir,$collect,$import_file);700 697 # This now stores the full pathname 698 $import_filename = $doc_rec->{'src-file'}->[0]; 699 } 700 else { 701 $import_filename = &util::filename_cat($collect_dir,$collect,$import_file); 702 } 701 703 702 704 # figure out correct metadata.xml file
Note:
See TracChangeset
for help on using the changeset viewer.