diff options
author | Günther Deschner <gd@samba.org> | 2016-05-11 15:41:02 +0200 |
---|---|---|
committer | Günther Deschner <gd@samba.org> | 2016-09-07 12:09:17 +0200 |
commit | 0ee5c9997e6c91f5fdffa36b9abf72883f67545d (patch) | |
tree | 09a2a13a49eba1f97b7a2fa5a506c6c5a36e40ae /pidl | |
parent | 5bbaf816122429004101da4e6401ddd12ea52988 (diff) | |
download | samba-0ee5c9997e6c91f5fdffa36b9abf72883f67545d.tar.gz |
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>
Reviewed-by: Stefan Metzmacher <metze@samba.org>
Diffstat (limited to 'pidl')
-rw-r--r-- | pidl/lib/Parse/Pidl/Wireshark/NDR.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm b/pidl/lib/Parse/Pidl/Wireshark/NDR.pm index 21ef714c420..49b0c2c33ba 100644 --- a/pidl/lib/Parse/Pidl/Wireshark/NDR.pm +++ b/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; } |