Permalink
Browse files

add test for RT #116547

  • Loading branch information...
1 parent 1b0aa36 commit 62e02f896c8ad67ef99bf92b5fb0e8e4aeb2ce83 @coke coke committed Jan 15, 2014
Showing with 7 additions and 0 deletions.
  1. +7 −0 S32-exceptions/misc.t
@@ -420,4 +420,11 @@ throws_like 'class Foobar is Foobar', X::Inheritance::SelfInherit, name => "Foob
throws_like q[sub f() {CALLER::<$x>}; my $x; f], X::Caller::NotDynamic, symbol => '$x';
+# RT #116547
+{
+ try EVAL('my ($abe, $ba, $abc); $abd');
+ diag $!.message;
+ ok $!.message ~~ /'Did you mean'/, "Doesn't explode";
+}
+
done;

0 comments on commit 62e02f8

Please sign in to comment.