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:
426db84
)
ignore NumberOfEntries
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Sun, 7 Mar 2010 19:22:41 +0000
(19:22 +0000)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Sun, 7 Mar 2010 19:22:41 +0000
(19:22 +0000)
git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@265
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
8a47f00
..
1d87059
100644
(file)
--- a/
lib/CWMP/Session.pm
+++ b/
lib/CWMP/Session.pm
@@
-154,7
+154,11
@@
sub process_request {
$self->store->set_state( $uid, $stored );
} else {
- my @params = sort grep { ! exists $stored->{Parameter}->{$_} } grep { ! m/\.$/ } keys %{ $stored->{ParameterInfo} };
+ my @params = sort
+ grep { ! exists $stored->{Parameter}->{$_} }
+ grep { ! m/\.$/ && ! m/NumberOfEntries/ }
+ keys %{ $stored->{ParameterInfo} }
+ ;
if ( @params ) {
warn "# GetParameterValues ", dump( @params );
my $first = shift @params;