From 424ced9e2dc3820a4a94213d1357f77a59e19c3a Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 16 Nov 2007 18:40:57 -0500 Subject: [PATCH] Remove debugging messages --- extra/ui/gadgets/scrollers/scrollers.factor | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/extra/ui/gadgets/scrollers/scrollers.factor b/extra/ui/gadgets/scrollers/scrollers.factor index 56183bd0d4..b125104e4f 100755 --- a/extra/ui/gadgets/scrollers/scrollers.factor +++ b/extra/ui/gadgets/scrollers/scrollers.factor @@ -115,10 +115,10 @@ scroller H{ : update-scroller ( scroller follows -- ) { - { [ dup t eq? ] [ drop (scroll>bottom) "A" drop ] } - { [ dup rect? ] [ swap (scroll>rect) "B" drop ] } - { [ dup ] [ swap (scroll>gadget) "C" drop ] } - { [ t ] [ drop dup scroller-value swap scroll "D" drop ] } + { [ dup t eq? ] [ drop (scroll>bottom) ] } + { [ dup rect? ] [ swap (scroll>rect) ] } + { [ dup ] [ swap (scroll>gadget) ] } + { [ t ] [ drop dup scroller-value swap scroll ] } } cond ; M: scroller layout*