diff options
| -rw-r--r-- | Plugin/Map.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Plugin/Map.pm b/Plugin/Map.pm index 25d100d..fb37e64 100644 --- a/Plugin/Map.pm +++ b/Plugin/Map.pm @@ -57,6 +57,10 @@ sub parse_list { return ("Error: expected ], got end of line", undef) unless $nest == 0; + if ($i != length($input)) { + return ("Error: unexpected item in the bagging area (after ']')", undef); + } + return (undef, @res); } |