projects
/
perl-cwmp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
7e8f73a
)
refresh parameter after change
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Tue, 9 Mar 2010 19:40:10 +0000
(20:40 +0100)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Tue, 9 Mar 2010 19:40:10 +0000
(20:40 +0100)
lib/CWMP/Vendor.pm
patch
|
blob
|
history
diff --git
a/lib/CWMP/Vendor.pm
b/lib/CWMP/Vendor.pm
index
9613528
..
8b2693f
100644
(file)
--- a/
lib/CWMP/Vendor.pm
+++ b/
lib/CWMP/Vendor.pm
@@
-87,6
+87,7
@@
sub vendor_config {
&& ( ! $tried->{$uid}->{$n}->{set} || $tried->{$uid}->{$n}->{set} ne $vendor->{$n} )
) {
$queue->enqueue( 'SetParameterValues', { $n => $vendor->{$n} } );
+ $queue->enqueue( 'GetParameterValues', [ $n ] ); # refresh after change
push @refresh, $n;
$tried->{$uid}->{$n}->{set} = $vendor->{$n};
warn "# set $uid $n $stored->{$n} -> $vendor->{$n}\n";