steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix slides for with-ui change

db4
Slava Pestov 2009-03-16 03:01:56 -05:00
parent 36d03dfa08
commit 5f2aac9bda
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extra/slides/slides.factor
View File

@ -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. ! See http://factorcode.org/license.txt for BSD license.
USING: arrays hashtables help.markup help.stylesheet io USING: arrays hashtables help.markup help.stylesheet io
io.styles kernel math models namespaces sequences ui ui.gadgets io.styles kernel math models namespaces sequences ui ui.gadgets
ui.gadgets.books ui.gadgets.panes ui.gestures ui.pens.gradient ui.gadgets.books ui.gadgets.panes ui.gestures ui.pens.gradient
parser accessors colors ; parser accessors colors fry ;
IN: slides IN: slides
CONSTANT: stylesheet CONSTANT: stylesheet
@ -104,4 +104,4 @@ TUPLE: slides < book ;
} set-gestures } set-gestures
: slides-window ( slides -- ) : slides-window ( slides -- )
[ <slides> "Slides" open-window ] with-ui ; '[ _ <slides> "Slides" open-window ] with-ui ;