Harmonize spelling

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

diff --git a/extra/tetris/game/game.factor b/extra/tetris/game/game.factor
index b6e2539bcab0596babd53b4086f1224bb040c314..ac5dbc2579ea3f31944b460ada4e38aae2d21d7c 100644 (file)
--- a/extra/tetris/game/game.factor
+++ b/extra/tetris/game/game.factor
@@ -42,7 +42,7 @@ CONSTANT: default-height 20
     level 1 - 60 * 1,000,000,000 swap - ;
 
 : add-block ( tetris block -- )
-    over [ board>> ] 2dip current-piece tetromino>> colour>> set-block ;
+    over [ board>> ] 2dip current-piece tetromino>> color>> set-block ;
 
 : game-over? ( tetris -- ? )
     [ board>> ] [ next-piece ] bi piece-valid? not ;