diff --git a/src/protocols/rdp/keymaps/generate.pl b/src/protocols/rdp/keymaps/generate.pl index 2846005a..50fe461a 100755 --- a/src/protocols/rdp/keymaps/generate.pl +++ b/src/protocols/rdp/keymaps/generate.pl @@ -32,9 +32,9 @@ use 5.008; sub keymap_symbol { - my $_ = shift; - s/-/_/g; - return 'guac_rdp_keymap_' . $_; + my $name = shift; + $name =~ s/-/_/g; + return 'guac_rdp_keymap_' . $name; } # @@ -54,6 +54,8 @@ print OUTPUT . '#else' . "\n" . '#include ' . "\n" . '#endif' . "\n" + . "\n" + . '#include ' . "\n" . "\n"; for my $filename (@ARGV) {