From 5c332525afc6485f156f97512ed84454cf418baa Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Fri, 1 Aug 2008 18:06:24 -0500
Subject: [PATCH] demos: Add 'with-ui' call

---
 extra/demos/demos.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/demos/demos.factor b/extra/demos/demos.factor
index ba906fc08b..c8e5a35f9e 100644
--- a/extra/demos/demos.factor
+++ b/extra/demos/demos.factor
@@ -15,7 +15,7 @@ IN: demos
 : <demo-runner> ( -- gadget )
   <pile> 1 >>fill demo-vocabs [ <run-vocab-button> add-gadget ] each ;
 
-: demos ( -- ) <demo-runner> <scroller> "Demos" open-window ;
+: demos ( -- ) [ <demo-runner> <scroller> "Demos" open-window ] with-ui ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!