Bläddra i källkod

Try to use relative path

Alois Mahdal 12 år sedan
förälder
incheckning
86207a6f40
1 ändrade filer med 1 tillägg och 0 borttagningar
  1. 1
    0
      mklinks

+ 1
- 0
mklinks Visa fil

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
     }