Skip to content
This repository
Browse code

[S32::Exception] X::Syntax::NegatedPair should report the key

  • Loading branch information...
commit bbbdb7846857f0e136cede8a1b2e7e5257ca42d3 1 parent 0d42d6c
Moritz Lenz authored August 02, 2012

Showing 1 changed file with 4 additions and 3 deletions. Show diff stats Hide diff stats

  1. 7  S32-setting-library/Exception.pod
7  S32-setting-library/Exception.pod
Source Rendered
@@ -17,8 +17,8 @@ Authors of previous versions of this document:
17 17
 
18 18
     Created: 26 Feb 2009
19 19
 
20  
-    Last Modified: 4 June 2012
21  
-    Version: 12
  20
+    Last Modified: 2 August 2012
  21
+    Version: 13
22 22
 
23 23
 The document is a draft.
24 24
 
@@ -581,7 +581,8 @@ Thrown when some piece of syntax is clearly Perl 5, not Perl 6.
581 581
 Thrown when a negated pair has a value, for exaple C<:!foo($val)>.
582 582
 
583 583
     my class X::Syntax::NegatedPair does X::Syntax {
584  
-        method message() { 'Argument not allowed on negated pair' }
  584
+        has $.key;
  585
+        method message() { "Argument not allowed on negated pair with keys '$.key'" }
585 586
     }
586 587
 
587 588
 =head3 X::Syntax::Variable::Numeric

0 notes on commit bbbdb78

Please sign in to comment.
Something went wrong with that request. Please try again.