Changeset 169

Timestamp:

Jan 19, 2018, 3:54:45 PM (7 years ago)

Author:

g7moreau

Message:

• Small bug for file in root folder

File:

• trunk/project-meta/project-meta (modified) (1 diff)

trunk/project-meta/project-meta

@@ -128 +128 @@
    for my $folder (sort keys %folders) {
       print "chmod o+rX,o-w $current_dir/$folder\n";
-      print "mkdir -p $dap_folder/$acronym/$folder\n" if -d $current_dir/$folder;
+      print "mkdir -p $dap_folder/$acronym/$folder\n" if -d "$current_dir/$folder";
       }
 
    for my $dataset (@{$meta->{'public-dap'}{'data-set'}}) {
-      my $folder = $dataset =~ s{/[^/]+$}{}r;
-      print "ln --symbolic --target-directory $dap_folder/$acronym/$folder/ $current_dir/$dataset\n";
+      if ($dataset =~ m{/}) {
+         # Folder case
+         my $folder = $dataset =~ s{/[^/]+$}{}r;
+         print "ln --symbolic --target-directory $dap_folder/$acronym/$folder/ $current_dir/$dataset\n";
+         }
+      else {
+         # File case
+         print "ln --symbolic --target-directory $dap_folder/$acronym/ $current_dir/$dataset\n";
+         }
 
    print "chmod -R o+rX,o-w $dap_folder/$acronym/\n";