raise X::Method::NotFound even for '' methods.

rakudo · Mar 13, 2013 · 103481f · 103481f
1 parent cee2f91
commit 103481f
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/core/Exception.pm b/src/core/Exception.pm
@@ -97,8 +97,7 @@ sub EXCEPTION(|) {
         my int $type = nqp::atkey_i($parrot_ex, 'type');
         my $ex;
         if $type == pir::const::EXCEPTION_METHOD_NOT_FOUND  &&
-            nqp::p6box_s(nqp::atkey_s($parrot_ex, 'message'))
-                ~~ /"Method '" (.+?) "' not found for invocant of class '" (.+)\'$/ {
+            nqp::p6box_s(nqp::atkey_s($parrot_ex, 'message')) ~~ /"Method '" (.*?) "' not found for invocant of class '" (.+)\'$/ {
 
             $ex := X::Method::NotFound.new(
                 method   => ~$0,