Parcourir la source

Try to use relative path

Alois Mahdal il y a 11 ans
Parent
révision
86207a6f40
1 fichiers modifiés avec 1 ajouts et 0 suppressions
  1. 1
    0
      mklinks

+ 1
- 0
mklinks Voir le fichier

74
         if (-e $target) {
74
         if (-e $target) {
75
             warn "target exists: $target\n";
75
             warn "target exists: $target\n";
76
         } else {
76
         } else {
77
+#           $source = File::Spec->abs2rel($source, $target);
77
             `ln -s $source $target`;
78
             `ln -s $source $target`;
78
         }
79
         }
79
     }
80
     }