there is no self.sorry but self.panic

rakudo · Nov 27, 2012 · beea5df · beea5df
1 parent 7bcefdd
commit beea5df
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Perl6/Grammar.pm b/src/Perl6/Grammar.pm
@@ -3449,7 +3449,7 @@ grammar Perl6::QGrammar is HLL::Grammar does STD {
     token stopper { <!> }
 
     method truly($bool, $opt) {
-        self.sorry("Cannot negate $opt adverb") unless $bool;
+        self.panic("Cannot negate $opt adverb") unless $bool;
         self;
     }