X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=cat%2Frun-cat-locally;fp=cat%2Frun-cat-locally;h=be60d076a9b1604ef5e6b90dcc49b1be57a39816;hp=bba2c08834669c38339ba08928eef84637376e5b;hb=75b6338da3e6e33c02b931623f074ab5a76a1788;hpb=9adddc19e448781cf2076c44f66242fe48b47c7c;ds=sidebyside

diff --git a/cat/run-cat-locally b/cat/run-cat-locally
index bba2c08..be60d07 100755
--- a/cat/run-cat-locally
+++ b/cat/run-cat-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 {