From cdc51e9ba53a9d63355d5dd196a2d62e96550543 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 7 Mar 2010 22:05:28 +0100 Subject: [PATCH] remove namespaces in SetParameterValues --- lib/CWMP/Methods.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lib/CWMP/Methods.pm b/lib/CWMP/Methods.pm index c529ed3..5721c41 100644 --- a/lib/CWMP/Methods.pm +++ b/lib/CWMP/Methods.pm @@ -110,11 +110,11 @@ sub SetParameterValues { my ( $X, $state ) = @_; $X->SetParameterValues( $cwmp, - $X->ParameterList( $cwmp, + $X->ParameterList( [], map { - $X->ParameterValueStruct( $cwmp, - $X->Name( $cwmp, $_ ), - $X->Value( $cwmp, $params->{$_} ) + $X->ParameterValueStruct( [], + $X->Name( [], $_ ), + $X->Value( [], $params->{$_} ) ) } sort keys %$params ) -- 2.20.1