projects
/
perl-cwmp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
use new CWMP::Parser
[perl-cwmp.git]
/
lib
/
CWMP
/
Request.pm
diff --git
a/lib/CWMP/Request.pm
b/lib/CWMP/Request.pm
index
0cea935
..
07b93f4
100644
(file)
--- a/
lib/CWMP/Request.pm
+++ b/
lib/CWMP/Request.pm
@@
-40,7
+40,7
@@
our $rules = [
next if $name eq '_content';
my $key = $name;
$key =~ s/^\w+://; # stip namespace
next if $name eq '_content';
my $key = $name;
$key =~ s/^\w+://; # stip namespace
- $state->{DeviceI
D
}->{ $key } = _tag( $tag_hash, $name, '_content' );
+ $state->{DeviceI
d
}->{ $key } = _tag( $tag_hash, $name, '_content' );
}
},
'EventStruct' => sub {
}
},
'EventStruct' => sub {