From: Sergey Matveev Date: Fri, 17 Jul 2015 19:45:39 +0000 (+0300) Subject: Unnecessary quotes on hash keys X-Git-Tag: 0.1~3 X-Git-Url: http://www.git.stargrave.org/?p=gerrvim.git;a=commitdiff_plain;h=30275884e05763f135f4f5c5f15e62397ce491e6 Unnecessary quotes on hash keys --- diff --git a/gerrvim2json.pl b/gerrvim2json.pl index bd52c42..cb4e210 100755 --- a/gerrvim2json.pl +++ b/gerrvim2json.pl @@ -112,11 +112,11 @@ sub buf2str { sub comment_done { ($comments{$filename} = []) unless defined $comments{$filename}; - my %c = ("message" => buf2str); + my %c = (message => buf2str); if ($lineend - $linebgn == 1) { - $c{"line"} = $linebgn; + $c{line} = $linebgn; } else { - $c{"range"} = {start_line => $linebgn, end_line => $lineend}; + $c{range} = {start_line => $linebgn, end_line => $lineend}; }; push @{$comments{$filename}}, \%c; } @@ -140,5 +140,5 @@ while (<>) { comment_done; my %result = (comments => \%comments); -($result{"message"} = $main_message) if $main_message; +($result{message} = $main_message) if $main_message; print encode_json(\%result);