projects
/
perl-cwmp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
014c5a7
)
fix warning
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Mon, 8 Mar 2010 13:38:42 +0000
(13:38 +0000)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Mon, 8 Mar 2010 13:38:42 +0000
(13:38 +0000)
git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@276
836a5e1a
-633d-0410-964b-
294494ad4392
lib/CWMP/Session.pm
patch
|
blob
|
history
diff --git
a/lib/CWMP/Session.pm
b/lib/CWMP/Session.pm
index
ab65e4d
..
4ce8a07
100644
(file)
--- a/
lib/CWMP/Session.pm
+++ b/
lib/CWMP/Session.pm
@@
-79,7
+79,7
@@
sub vendor_hook {
my @refresh;
foreach my $n ( keys %$vendor_data ) {
- if ( $vendor_data->{$n} ne $stored->{$n} ) {
+ if (
defined $stored->{$n} &&
$vendor_data->{$n} ne $stored->{$n} ) {
next if $set_tried->{$uid}->{$n}++;
push @refresh, $n;
$queue->enqueue( 'SetParameterValues', { $n => $vendor_data->{$n} } );