From 1c3981f7ed0ec37c9980bdecd88b9deccf8c234f Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 4 Aug 2015 21:09:04 -0700 Subject: [PATCH] slides: use toggle-fullscreen. --- extra/slides/slides.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/slides/slides.factor b/extra/slides/slides.factor index 8b02fbdc47..8e90d9132e 100644 --- a/extra/slides/slides.factor +++ b/extra/slides/slides.factor @@ -104,7 +104,7 @@ SYNTAX: STRIP-TEASE: { T{ button-down } [ request-focus ] } { T{ key-down f f "DOWN" } [ next-page ] } { T{ key-down f f "UP" } [ prev-page ] } - { T{ key-down f f "f" } [ dup fullscreen? not set-fullscreen ] } + { T{ key-down f f "f" } [ toggle-fullscreen ] } } set-gestures : slides-window ( slides -- )