Supply.schedule_on -> schedule-on (Perl6ish++)

rakudo · Apr 28, 2014 · 3f74909 · 3f74909
1 parent 50b69ee
commit 3f74909
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/core/Supply.pm b/src/core/Supply.pm
@@ -119,8 +119,8 @@ my role Supply {
     method flat()              { SupplyOperations.flat(self) }
     method grep(&filter)       { SupplyOperations.grep(self, &filter) }
     method map(&mapper)        { SupplyOperations.map(self, &mapper) }
-    method schedule_on(Scheduler $scheduler) {
-        SupplyOperations.schedule_on(self, $scheduler);
+    method schedule-on(Scheduler $scheduler) {
+        SupplyOperations.schedule-on(self, $scheduler);
     }
     method start(&startee)     { SupplyOperations.start(self, &startee) }
     method stable($time, :$scheduler = $*SCHEDULER) {

diff --git a/src/core/SupplyOperations.pm b/src/core/SupplyOperations.pm
@@ -147,7 +147,7 @@ my class SupplyOperations is repr('Uninstantiable') {
         MapSupply.new(:$source, :&mapper)
     }
 
-    method schedule_on(Supply $source, Scheduler $scheduler) {
+    method schedule-on(Supply $source, Scheduler $scheduler) {
         my class ScheduleSupply does Supply does PrivatePublishing {
             has $!source;
             has $!scheduler;