From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Tue, 9 Mar 2010 19:14:24 +0000 (+0100)
Subject: added empty ParameterKey to make SetParameterValues work
X-Git-Url: http://git.rot13.org/?p=perl-cwmp.git;a=commitdiff_plain;h=7e8f73a25240010637c0076678b8e140fd8c06c4;ds=sidebyside

added empty ParameterKey to make SetParameterValues work
---

diff --git a/lib/CWMP/Methods.pm b/lib/CWMP/Methods.pm
index d614630..3a2aa68 100644
--- a/lib/CWMP/Methods.pm
+++ b/lib/CWMP/Methods.pm
@@ -117,7 +117,8 @@ sub SetParameterValues {
 						$X->Value( [], $params->{$_} )
 					)
 				} sort keys %$params
-			)
+			),
+			$X->ParameterKey( '' ),
 		);
 	});
 }