git.annexia.org
/
libguestfs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
9adddc1
)
Check return value from readlink.
author
Richard Jones
<rjones@trick.home.annexia.org>
Wed, 23 Sep 2009 11:09:26 +0000
(12:09 +0100)
committer
Richard Jones
<rjones@trick.home.annexia.org>
Wed, 23 Sep 2009 11:09:26 +0000
(12:09 +0100)
cat/run-cat-locally
patch
|
blob
|
history
df/run-df-locally
patch
|
blob
|
history
edit/run-edit-locally
patch
|
blob
|
history
inspector/run-inspector-locally
patch
|
blob
|
history
rescue/run-rescue-locally
patch
|
blob
|
history
diff --git
a/cat/run-cat-locally
b/cat/run-cat-locally
index
bba2c08
..
be60d07
100755
(executable)
--- 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) {
# 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 {
if(File::Spec->file_name_is_absolute($link)) {
$path = $link;
} else {
diff --git
a/df/run-df-locally
b/df/run-df-locally
index
3557443
..
f8a50aa
100755
(executable)
--- a/
df/run-df-locally
+++ b/
df/run-df-locally
@@
-34,7
+34,7
@@
my $path = $0;
# Follow symlinks until we get to the real file
while(-l $path) {
# 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 {
if(File::Spec->file_name_is_absolute($link)) {
$path = $link;
} else {
diff --git
a/edit/run-edit-locally
b/edit/run-edit-locally
index
90968a2
..
3a6a9ab
100755
(executable)
--- 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) {
# 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 {
if(File::Spec->file_name_is_absolute($link)) {
$path = $link;
} else {
diff --git
a/inspector/run-inspector-locally
b/inspector/run-inspector-locally
index
156f3ae
..
6106282
100755
(executable)
--- a/
inspector/run-inspector-locally
+++ b/
inspector/run-inspector-locally
@@
-34,7
+34,7
@@
my $path = $0;
# Follow symlinks until we get to the real file
while(-l $path) {
# 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 {
if(File::Spec->file_name_is_absolute($link)) {
$path = $link;
} else {
diff --git
a/rescue/run-rescue-locally
b/rescue/run-rescue-locally
index
d814ed5
..
33191e7
100755
(executable)
--- a/
rescue/run-rescue-locally
+++ b/
rescue/run-rescue-locally
@@
-35,7
+35,7
@@
my $path = $0;
# Follow symlinks until we get to the real file
while(-l $path) {
# 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 {
if(File::Spec->file_name_is_absolute($link)) {
$path = $link;
} else {