]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/ui/gadgets/lists/lists.factor
Fix comments to be ! not #!.
[factor.git] / extra / ui / gadgets / lists / lists.factor
index 249698e8dc11038de050f62bdd39fb1f40d420f9..e30c887784444086d29e18a0eb2c640cd785e944 100644 (file)
@@ -67,8 +67,8 @@ M: list focusable-child* drop t ;
     dup index>> swap control-value ?nth ;
 
 : scroll>selected ( list -- )
-    #! We change the rectangle's width to zero to avoid
-    #! scrolling right.
+    ! We change the rectangle's width to zero to avoid
+    ! scrolling right.
     [ selected-rect rect-bounds { 0 1 } v* <rect> ] keep
     scroll>rect ;