Changeset 15166

Timestamp:

2008-04-02T18:13:32+13:00 (16 years ago)

Author:

ak19

Message:

Modified tmp_area_convert_file routine to use pass new argument ensure_path_absolute to util::soft_link to make sure soft-linking works for GSDL remote case

File:

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

gsdl/trunk/perllib/plugins/ConvertToPlug.pm

@@ -289 +289 @@
     $suffix = lc($suffix);
     my $tmp_filename = &util::filename_cat($tmp_dirname, "$tailname$suffix");
-    &util::soft_link($input_filename, $tmp_filename);
+    
+    # If gsdl is remote, we're given relative path to input file, of the form import/tailname.suffix
+    # But we can't softlink to relative paths. Therefore, we need to ensure that
+    # the input_filename is the absolute path, see http://perldoc.perl.org/File/Spec.html
+    my $ensure_path_absolute = 1; # true
+    &util::soft_link($input_filename, $tmp_filename, $ensure_path_absolute);
     my $verbosity = $self->{'verbosity'};
     if ($verbosity > 0) {