From: Richard W.M. Jones <rjones@redhat.com>
Date: Mon, 17 Oct 2016 10:30:17 +0000 (+0100)
Subject: RHEL 6: Don't use OUTPUT => "self", only available in RHEL 7.
X-Git-Url: http://git.annexia.org/?a=commitdiff_plain;h=9ec4758b87dcb57f82247e24fb1575b1e0fbf70e;p=import-to-ovirt.git

RHEL 6: Don't use OUTPUT => "self", only available in RHEL 7.
---

diff --git a/import-to-ovirt.pl b/import-to-ovirt.pl
index 2828172..d9204b4 100755
--- a/import-to-ovirt.pl
+++ b/import-to-ovirt.pl
@@ -510,8 +510,9 @@ my %prefix_map = (
 );
 my @forced_ns_decls = keys %prefix_map;
 
+my $ovf = "";
 my $w = XML::Writer->new (
-    OUTPUT => "self",
+    OUTPUT => \$ovf,
     NAMESPACES => 1,
     PREFIX_MAP => \%prefix_map,
     FORCED_NS_DECLS => \@forced_ns_decls,
@@ -782,8 +783,6 @@ $w->endTag ("Content");
 $w->endTag ([$ovf_ns, "Envelope"]);
 $w->end ();
 
-my $ovf = $w->to_string;
-
 #print "OVF:\n$ovf\n";
 
 my $ovf_dir = "$esd_uuid_dir/master/vms/$vm_uuid";