The caller can then rewind and reread it if they feel like.
Signed-off-by: Ian Jackson <ian.jack...@eu.citrix.com>
---
Osstest/TestSupport.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/Osstest/TestSupport.pm b/Osstest/TestSupport.pm
index 2b67e32..7b9d815 100644
--- a/Osstest/TestSupport.pm
+++ b/Osstest/TestSupport.pm
@@ -1005,7 +1005,7 @@ sub open_unique_stashfile ($) {
my $dh;
for (;;) {
my $df= $$leafref;
- $dh= new IO::File "$stash/$df", O_WRONLY|O_EXCL|O_CREAT;
+ $dh= new IO::File "$stash/$df", O_RDWR|O_EXCL|O_CREAT;
last if $dh;
die "$df $!" unless $!==&EEXIST;
next_unique_name $leafref;
--
1.7.10.4
_______________________________________________
Xen-devel mailing list
Xen-devel@lists.xen.org
http://lists.xen.org/xen-devel
