git.annexia.org
/
libguestfs.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Version 1.5.12.
[libguestfs.git]
/
tools
/
virt-edit
diff --git
a/tools/virt-edit
b/tools/virt-edit
index
154d336
..
128872e
100755
(executable)
--- a/
tools/virt-edit
+++ b/
tools/virt-edit
@@
-180,7
+180,7
@@
my $root_dev = $roots[0];
my $os = $oses->{$root_dev};
mount_operating_system ($g, $os, 0);
my $os = $oses->{$root_dev};
mount_operating_system ($g, $os, 0);
-my ($fh_not_used, $tempname) = tempfile ();
+my ($fh_not_used, $tempname) = tempfile (
UNLINK => 1
);
# Allow this to fail in case eg. the file does not exist.
$g->download($filename, $tempname);
# Allow this to fail in case eg. the file does not exist.
$g->download($filename, $tempname);
@@
-203,7
+203,7
@@
if (!defined $expr) {
print __"File not changed.\n";
}
} else {
print __"File not changed.\n";
}
} else {
- my ($fh, $tempout) = tempfile ();
+ my ($fh, $tempout) = tempfile (
UNLINK => 1
);
# Apply a Perl expression to the lines of the file.
open IFILE, $tempname or die "$tempname: $!";
# Apply a Perl expression to the lines of the file.
open IFILE, $tempname or die "$tempname: $!";