[PATCH tck 3/5] Add DomainBuilder->rminterface function.

[Cédric Bosdonnat <cbosdonnat@xxxxxxxx>]

From: Cédric Bosdonnat <cedric.bosdonnat@xxxxxxx>

---
 lib/Sys/Virt/TCK/DomainBuilder.pm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lib/Sys/Virt/TCK/DomainBuilder.pm b/lib/Sys/Virt/TCK/DomainBuilder.pm
index 7a20008..e9453ee 100644
--- a/lib/Sys/Virt/TCK/DomainBuilder.pm
+++ b/lib/Sys/Virt/TCK/DomainBuilder.pm
@@ -271,6 +271,13 @@ sub disk {
     return $self;
 }
 
+
+sub rminterface {
+    my $self = shift;
+
+    return pop @{$self->{interfaces}};
+}
+
 sub interface {
     my $self = shift;
     my %params = @_;
-- 
2.1.4

--
libvir-list mailing list
libvir-list@xxxxxxxxxx
https://www.redhat.com/mailman/listinfo/libvir-list