Harmonize spelling

[factor.git] / extra / tetris / board / board.factor

diff --git a/extra/tetris/board/board.factor b/extra/tetris/board/board.factor
index 9acb53d8b36b143165f4fe14cf276bce99986aa8..2ca3ba8a0bff0ae99639a16609cef23f905761b2 100644 (file)
--- a/extra/tetris/board/board.factor
+++ b/extra/tetris/board/board.factor
@@ -22,9 +22,9 @@ TUPLE: board
 : board@block ( board block -- n row )
     [ second swap rows>> nth ] keep first swap ;
 
-: set-block ( board block colour -- ) -rot board@block set-nth ;
+: set-block ( board block color -- ) -rot board@block set-nth ;
 
-: block ( board block -- colour ) board@block nth ;
+: block ( board block -- color ) board@block nth ;
 
 : block-free? ( board block -- ? ) block not ;