Fix teodesian#325: fix unescaped left brace in regex warnings in test…

…suite
troglodyne · Aug 2, 2017 · f9f6d94 · f9f6d94
1 parent 672cad2
commit f9f6d94
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/t/04-commands-implemented.t b/t/04-commands-implemented.t
@@ -20,7 +20,7 @@ for my $command (keys %{$comm}) {
     open(my $fh, '<', $file) or die "Couldn't open file $file";
     for (<$fh>) {
       if (/'?command'?\s*=>\s*'$command'/
-       or /{'?commands'?}->{'?$command'?}/) {
+       or /{'?commands'?}->\{'?$command'?}/) {
         pass("find $command");
         $found_command = 1;
       }