Merge branch 'master' of git://github.com/perl6/std

perl6 · Feb 4, 2013 · da06458 · da06458
2 parents 3725e26 + 7deb9d7
commit da06458
Showing 1 changed file with 6 additions and 6 deletions.
diff --git a/CORE.setting b/CORE.setting
@@ -643,15 +643,15 @@ my proto sub infix:<∋>($, $ --> Bool) is equiv(&infix:<==>) is export {*}
 my proto sub infix:<(cont)>($a, $b --> Bool) {*}
 my proto sub infix:<∌>($a, $b --> Bool) is equiv(&infix:<==>) is export {*}
 
-my proto sub infix:<∪>(Any $a, Any $b --> Set) is equiv(&infix:<X>) is export {*}
-my proto sub infix:<(|)>($a, $b --> Set) is equiv(&infix:<X>) is export {*}
+my proto sub infix:<∪>(Any $a, Any $b --> Set) is equiv(&infix:<|>) is export {*}
+my proto sub infix:<(|)>($a, $b --> Set) is equiv(&infix:<|>) is export {*}
 
-my proto sub infix:<∩>(Any $a, Any $b --> Set) is equiv(&infix:<X>) is export {*}
-my proto sub infix:<(&)>($a, $b --> Set) is equiv(&infix:<X>) is export {*}
+my proto sub infix:<∩>(Any $a, Any $b --> Set) is equiv(&infix:<&>) is export {*}
+my proto sub infix:<(&)>($a, $b --> Set) is equiv(&infix:<&>) is export {*}
 
-my proto sub infix:<(-)>(Any $a, Any $b --> Set) is equiv(&infix:<X>) is export {*}
+my proto sub infix:<(-)>(Any $a, Any $b --> Set) is equiv(&infix:<^>) is export {*}
 
-my proto sub infix:<(^)>(Any $a, Any $b --> Set) is equiv(&infix:<X>) is export {*}
+my proto sub infix:<(^)>(Any $a, Any $b --> Set) is equiv(&infix:<^>) is export {*}
 
 my proto sub infix:<⊆>($, $ --> Bool) is equiv(&infix:<==>) is export {*}
 my proto sub infix:['(<=)']($a, $b --> Bool) is equiv(&infix:<==>) is export {*}