diff --git a/contrib/tetris/tetris-gadget.factor b/contrib/tetris/tetris-gadget.factor
index b1b6a9b762..ee6ea67e90 100644
--- a/contrib/tetris/tetris-gadget.factor
+++ b/contrib/tetris/tetris-gadget.factor
@@ -46,5 +46,5 @@ M: tetris-gadget graft* ( gadget -- )
 M: tetris-gadget ungraft* ( gadget -- )
     t swap set-tetris-gadget-quit? ;
 
-: tetris-window ( -- ) <default-tetris> <tetris-gadget> dup "Tetris" open-titled-window ;
+: tetris-window ( -- ) <default-tetris> <tetris-gadget> "Tetris" open-titled-window ;