equal
deleted
inserted
replaced
1991 gridAlign notNil ifTrue:[gridY := gridAlign y] |
1991 gridAlign notNil ifTrue:[gridY := gridAlign y] |
1992 ifFalse:[gridY := 1]. |
1992 ifFalse:[gridY := 1]. |
1993 |
1993 |
1994 self moveDo:[:aView| |
1994 self moveDo:[:aView| |
1995 aligning ifTrue:[ |
1995 aligning ifTrue:[ |
1996 n := ((aView computeOrigin x) \\ gridY). |
1996 n := ((aView computeOrigin y) \\ gridY). |
1997 n == 0 ifTrue:[n := gridY]. |
1997 n == 0 ifTrue:[n := gridY]. |
1998 n := n negated. |
1998 n := n negated. |
1999 ] ifFalse:[ |
1999 ] ifFalse:[ |
2000 n := -1 |
2000 n := -1 |
2001 ]. |
2001 ]. |
2002 n := n * howMany. |
2002 n := n * howMany. |
2003 self shiftLayout:aView top:n bottom:n |
2003 self shiftLayout:aView top:n bottom:n |
2004 ] |
2004 ] |
2005 |
|
2006 ! ! |
2005 ! ! |
2007 |
2006 |
2008 !UIObjectView methodsFor:'user actions-position'! |
2007 !UIObjectView methodsFor:'user actions-position'! |
2009 |
2008 |
2010 alignResizeSelectionLeft |
2009 alignResizeSelectionLeft |