[libnet-dbus-perl] 282/335: Update test script introspection XML for GetAll method

Intrigeri intrigeri at moszumanska.debian.org
Sat Mar 21 01:08:10 UTC 2015


This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to branch experimental
in repository libnet-dbus-perl.

commit 76b1bd2abb3cf11ca83ece576c355e7ad3ffb4fe
Author: Daniel P. Berrange <dan at berrange.com>
Date:   Tue Jun 28 22:35:58 2011 +0100

    Update test script introspection XML for GetAll method
---
 t/45-exporter.t          | 4 ++++
 t/50-object-introspect.t | 4 ++++
 t/60-object-props.t      | 4 ++++
 t/65-object-magic.t      | 4 ++++
 t/66-child-objects.t     | 8 ++++++++
 5 files changed, 24 insertions(+)

diff --git a/t/45-exporter.t b/t/45-exporter.t
index 0792047..3c8e616 100644
--- a/t/45-exporter.t
+++ b/t/45-exporter.t
@@ -151,6 +151,10 @@ my $wantxml = <<EOF;
       <arg type="s" direction="in"/>
       <arg type="v" direction="out"/>
     </method>
+    <method name="GetAll">
+      <arg type="s" direction="in"/>
+      <arg type="a{sv}" direction="out"/>
+    </method>
     <method name="Set">
       <arg type="s" direction="in"/>
       <arg type="s" direction="in"/>
diff --git a/t/50-object-introspect.t b/t/50-object-introspect.t
index 7090308..47e0261 100644
--- a/t/50-object-introspect.t
+++ b/t/50-object-introspect.t
@@ -33,6 +33,10 @@ my $xml_expect = <<EOF;
       <arg type="s" direction="in"/>
       <arg type="v" direction="out"/>
     </method>
+    <method name="GetAll">
+      <arg type="s" direction="in"/>
+      <arg type="a{sv}" direction="out"/>
+    </method>
     <method name="Set">
       <arg type="s" direction="in"/>
       <arg type="s" direction="in"/>
diff --git a/t/60-object-props.t b/t/60-object-props.t
index 368e879..c0467c4 100644
--- a/t/60-object-props.t
+++ b/t/60-object-props.t
@@ -87,6 +87,10 @@ my $xml_expect = <<EOF;
       <arg type="s" direction="in"/>
       <arg type="v" direction="out"/>
     </method>
+    <method name="GetAll">
+      <arg type="s" direction="in"/>
+      <arg type="a{sv}" direction="out"/>
+    </method>
     <method name="Set">
       <arg type="s" direction="in"/>
       <arg type="s" direction="in"/>
diff --git a/t/65-object-magic.t b/t/65-object-magic.t
index 3da9ace..21e7c33 100644
--- a/t/65-object-magic.t
+++ b/t/65-object-magic.t
@@ -90,6 +90,10 @@ my $xml_expect = <<EOF;
       <arg type="s" direction="in"/>
       <arg type="v" direction="out"/>
     </method>
+    <method name="GetAll">
+      <arg type="s" direction="in"/>
+      <arg type="a{sv}" direction="out"/>
+    </method>
     <method name="Set">
       <arg type="s" direction="in"/>
       <arg type="s" direction="in"/>
diff --git a/t/66-child-objects.t b/t/66-child-objects.t
index 1f942b8..1fdc217 100644
--- a/t/66-child-objects.t
+++ b/t/66-child-objects.t
@@ -133,6 +133,10 @@ my $xml_expect = <<EOF;
       <arg type="s" direction="in"/>
       <arg type="v" direction="out"/>
     </method>
+    <method name="GetAll">
+      <arg type="s" direction="in"/>
+      <arg type="a{sv}" direction="out"/>
+    </method>
     <method name="Set">
       <arg type="s" direction="in"/>
       <arg type="s" direction="in"/>
@@ -176,6 +180,10 @@ $xml_expect = <<EOF;
       <arg type="s" direction="in"/>
       <arg type="v" direction="out"/>
     </method>
+    <method name="GetAll">
+      <arg type="s" direction="in"/>
+      <arg type="a{sv}" direction="out"/>
+    </method>
     <method name="Set">
       <arg type="s" direction="in"/>
       <arg type="s" direction="in"/>

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-dbus-perl.git



More information about the Pkg-perl-cvs-commits mailing list