[libnet-dbus-perl] 242/335: Pass NULL into open_container if we have empty string to avoid strict assertion checks in new dbus

[Intrigeri]

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 90dd9784d91498b6d72552e18a530dd2fc1aa68a
Author: Daniel P. Berrange <berrange at redhat.com>
Date:   Thu Jul 12 10:38:27 2007 -0400

    Pass NULL into open_container if we have empty string to avoid strict assertion checks in new dbus
---
 DBus.xs | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/DBus.xs b/DBus.xs
index 51a0cde..4106bd5 100644
--- a/DBus.xs
+++ b/DBus.xs
@@ -1301,7 +1301,10 @@ _open_container(iter, type, sig)
 	char *sig;
     CODE:
 	RETVAL = dbus_new(DBusMessageIter, 1);
-	dbus_message_iter_open_container(iter, type, sig, RETVAL);
+	if (!dbus_message_iter_open_container(iter, type, sig && *sig == '\0' ? NULL : sig, RETVAL)) {
+		dbus_free(RETVAL);
+		croak("failed to open iterator container");
+	}
     OUTPUT:
 	RETVAL
 

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