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:
c132d8c
)
find all Parameters supported by CPE
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Mon, 8 Mar 2010 14:23:19 +0000
(14:23 +0000)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Mon, 8 Mar 2010 14:23:19 +0000
(14:23 +0000)
git-svn-id: https://perl-cwmp.googlecode.com/svn/trunk@277
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
4ce8a07
..
9d2a7b1
100644
(file)
--- a/
lib/CWMP/Session.pm
+++ b/
lib/CWMP/Session.pm
@@
-173,7
+173,7
@@
sub process_request {
$xml = $self->dispatch( 'GetParameterNames', [ 'InternetGatewayDevice.', 1 ] );
} else {
my @params =
- grep { m/\.$/
&& ! m/\.\d+\.$/
}
+ grep { m/\.$/ }
keys %{ $stored->{ParameterInfo} }
;
if ( @params ) {