rosetta-code.metronome: remove useless close-window call

diff --git a/extra/rosetta-code/metronome/metronome.factor b/extra/rosetta-code/metronome/metronome.factor
index eb452025b8c7c6a6c113e7f91552e21fb5ebaeea..18b9331e0f0dd2b21d0e9a497f072ad70a2af9a6 100644 (file)
--- a/extra/rosetta-code/metronome/metronome.factor
+++ b/extra/rosetta-code/metronome/metronome.factor
@@ -32,13 +32,11 @@ IN: rosetta-code.metronome
 
 : metronome ( bpm notes -- )
     <circular> open-metronome-window
-    [
-        swap 0 <semaphore>
-        {
-            [ 2nip start-metronome-timer ]
-            [ metronome-loop drop ]
-        } 4 ncleave
-    ]
-    [ close-window stop-timer ] bi ;
+    swap 0 <semaphore>
+    {
+        [ 2nip start-metronome-timer ]
+        [ metronome-loop drop ]
+    } 4 ncleave
+    stop-timer ;
 
 ! example usage: 60 { 440 220 330 } metronome