Project

General

Profile

Revision 7820

send the original filename in the upload() method since that is supported by the Metacat API. https://projects.ecoinformatics.org/ecoinfo/issues/6007

View differences:

Metacat.pm
259 259
  my $self = shift;
260 260
  my $docid = shift;
261 261
  my $datafile = shift;
262
  my $filename = shift;
262 263

  
263 264
  my $returnval = 0;
264 265

  
265 266
  my %postData = ( action => 'upload',
266 267
                   docid => $docid,
267 268
                   datafile => [$datafile],
269
                   filename => $filename,
268 270
                   enctype => 'form-data'
269 271
                 );
270 272

  

Also available in: Unified diff