diff options
| author | Richard Jones <rjones@trick.home.annexia.org> | 2009-09-23 12:09:26 +0100 |
|---|---|---|
| committer | Richard Jones <rjones@trick.home.annexia.org> | 2009-09-23 12:09:26 +0100 |
| commit | 75b6338da3e6e33c02b931623f074ab5a76a1788 (patch) | |
| tree | a717f4d0ef92e3c8a78b7e8ab964b31189063949 /edit | |
| parent | 9adddc19e448781cf2076c44f66242fe48b47c7c (diff) | |
| download | libguestfs-75b6338da3e6e33c02b931623f074ab5a76a1788.tar.gz libguestfs-75b6338da3e6e33c02b931623f074ab5a76a1788.tar.xz libguestfs-75b6338da3e6e33c02b931623f074ab5a76a1788.zip | |
Check return value from readlink.
Diffstat (limited to 'edit')
| -rwxr-xr-x | edit/run-edit-locally | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/edit/run-edit-locally b/edit/run-edit-locally index 90968a27..3a6a9abf 100755 --- a/edit/run-edit-locally +++ b/edit/run-edit-locally @@ -34,7 +34,7 @@ my $path = $0; # Follow symlinks until we get to the real file while(-l $path) { - my $link = readlink($path); + my $link = readlink($path) or die "readlink: $path: $!"; if(File::Spec->file_name_is_absolute($link)) { $path = $link; } else { |