diff options
| author | Luboš Luňák <l.lunak@suse.cz> | 2012-10-29 23:39:00 +0100 |
|---|---|---|
| committer | Luboš Luňák <l.lunak@suse.cz> | 2012-10-29 23:41:40 +0100 |
| commit | e922d0ce1081bb90da30735c2cb22b6ce2ca7220 (patch) | |
| tree | 418c9665180e8f32fdd618a38c2f7f96772aa116 /solenv | |
| parent | a6ec2349fa866c9af18feb7d13873a19e81449e0 (diff) | |
fix absolute path test in linkoo
Change-Id: I0ac41af09ac6582c3f75239f2163c895665cd572
Diffstat (limited to 'solenv')
| -rwxr-xr-x | solenv/bin/linkoo | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/solenv/bin/linkoo b/solenv/bin/linkoo index e8eff526ab7f..c97df916dd40 100755 --- a/solenv/bin/linkoo +++ b/solenv/bin/linkoo @@ -106,8 +106,8 @@ if ($usage || !defined $OOO_INSTALL || !defined $OOO_BUILD) { exit (1); } -substr ($OOO_INSTALL, 0, 1) eq '/' || die "linkoo requires absolute paths ($OOO_INSTALL does not qualify)"; -substr ($OOO_BUILD, 0, 1) eq '/' || die "linkoo requires absolute paths ($OOO_BUILD does not qualify)"; +File::Spec->file_name_is_absolute($OOO_INSTALL) || die "linkoo requires absolute paths ($OOO_INSTALL does not qualify)"; +File::Spec->file_name_is_absolute($OOO_BUILD) || die "linkoo requires absolute paths ($OOO_BUILD does not qualify)"; -d $OOO_INSTALL || die "No such directory $OOO_INSTALL"; -w $OOO_INSTALL || die "You need write access to $OOO_INSTALL"; |