]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ui/gadgets/glass/glass.factor
ui: cleanup some using lists.
[factor.git] / basis / ui / gadgets / glass / glass.factor
index 34c641040e70cb701fcb83ad0372026a9b3bd51e..ba47f55e38d762e10cf43445d3fa35da9eaba5ac 100644 (file)
@@ -1,8 +1,8 @@
 ! Copyright (C) 2005, 2009 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors kernel namespaces ui.gadgets ui.gadgets.worlds
-ui.gadgets.wrappers ui.gestures math.rectangles
-math.rectangles.positioning combinators vectors ;
+USING: accessors kernel math.rectangles
+math.rectangles.positioning namespaces ui.gadgets
+ui.gadgets.worlds ui.gadgets.wrappers ui.gestures vectors ;
 FROM: ui.gadgets.wrappers => wrapper ;
 IN: ui.gadgets.glass
 
@@ -19,7 +19,7 @@ TUPLE: glass < gadget visible-rect owner ;
         swap >>visible-rect
         swap add-gadget
         swap >>owner ;
-    
+
 : visible-rect ( glass -- rect )
     [ visible-rect>> ] [ owner>> ] bi screen-loc offset-rect ;
 
@@ -78,4 +78,4 @@ popup H{
 
 : show-popup ( owner popup visible-rect -- )
     [ [ dup dup popup>> [ hide-glass ] when* ] dip <popup> ] dip
-    [ drop >>popup drop ] [ show-glass ] 3bi ;
\ No newline at end of file
+    [ drop >>popup drop ] [ show-glass ] 3bi ;