summaryrefslogtreecommitdiff
path: root/tools/pidl
diff options
context:
space:
mode:
authorGünther Deschner <gd@samba.org>2016-05-11 15:41:02 +0200
committerMichael Mann <mmann78@netscape.net>2016-08-06 14:06:24 +0000
commit29cc1817b9dee92748199f9517815a0437393023 (patch)
treef4e7eb090237a9af48c6b0566145ee33a887871a /tools/pidl
parent3bbbfd059c2287124c577cf68106687804195143 (diff)
downloadwireshark-29cc1817b9dee92748199f9517815a0437393023.tar.gz
tools/pidl: Keep case from fieldnames.
Change-Id: I5626cfa0487cc88eb65cc349c05ae1762bc953f4 Signed-off-by: Guenther Deschner <gd@samba.org> Reviewed-on: https://code.wireshark.org/review/16720 Petri-Dish: Michael Mann <mmann78@netscape.net> Tested-by: Petri Dish Buildbot <buildbot-no-reply@wireshark.org> Reviewed-by: Michael Mann <mmann78@netscape.net>
Diffstat (limited to 'tools/pidl')
-rw-r--r--tools/pidl/lib/Parse/Pidl/Wireshark/NDR.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/pidl/lib/Parse/Pidl/Wireshark/NDR.pm b/tools/pidl/lib/Parse/Pidl/Wireshark/NDR.pm
index f3d7f69d26..22854a9fbd 100644
--- a/tools/pidl/lib/Parse/Pidl/Wireshark/NDR.pm
+++ b/tools/pidl/lib/Parse/Pidl/Wireshark/NDR.pm
@@ -61,7 +61,7 @@ sub field2name($)
$field =~ s/^(_)*//g; # Remove any starting underscores
$field =~ s/_/ /g; # Replace underscores with spaces
- $field =~ s/(\w+)/\u\L$1/g; # Capitalise each word
+ $field =~ s/(\w+)/\u$1/g; # Capitalise each word
return $field;
}