From 5f2aac9bda08020f231905465d0b897c4981cd8c Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Mon, 16 Mar 2009 03:01:56 -0500 Subject: [PATCH] Fix slides for with-ui change --- extra/slides/slides.factor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/extra/slides/slides.factor b/extra/slides/slides.factor index 752d0b3ffa..c7a27f87a4 100755 --- a/extra/slides/slides.factor +++ b/extra/slides/slides.factor @@ -1,9 +1,9 @@ -! Copyright (C) 2007, 2008 Slava Pestov. +! Copyright (C) 2007, 2009 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. USING: arrays hashtables help.markup help.stylesheet io io.styles kernel math models namespaces sequences ui ui.gadgets ui.gadgets.books ui.gadgets.panes ui.gestures ui.pens.gradient -parser accessors colors ; +parser accessors colors fry ; IN: slides CONSTANT: stylesheet @@ -104,4 +104,4 @@ TUPLE: slides < book ; } set-gestures : slides-window ( slides -- ) - [ "Slides" open-window ] with-ui ; + '[ _ "Slides" open-window ] with-ui ;