projects
/
perl-cwmp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
added empty ParameterKey to make SetParameterValues work
[perl-cwmp.git]
/
lib
/
CWMP
/
Methods.pm
diff --git
a/lib/CWMP/Methods.pm
b/lib/CWMP/Methods.pm
index
5721c41
..
3a2aa68
100644
(file)
--- a/
lib/CWMP/Methods.pm
+++ b/
lib/CWMP/Methods.pm
@@
-77,7
+77,7
@@
sub GetRPCMethods {
my ( $self, $state ) = @_;
$self->xml( $state, sub {
my ( $X, $state ) = @_;
- $X->GetRPCMethods();
+ $X->GetRPCMethods(
$cwmp, ''
);
});
};
@@
-117,7
+117,8
@@
sub SetParameterValues {
$X->Value( [], $params->{$_} )
)
} sort keys %$params
- )
+ ),
+ $X->ParameterKey( '' ),
);
});
}