diff -r 6384ec64a6dd -r 8b301af1cdcc Scroller.st --- a/Scroller.st Mon Jul 15 09:11:26 1996 +0200 +++ b/Scroller.st Mon Jul 15 12:09:19 1996 +0200 @@ -33,7 +33,7 @@ category:'Views-Interactors' ! -!Scroller class methodsFor:'documentation'! +!Scroller class methodsFor:'documentation'! copyright " @@ -271,7 +271,7 @@ " ! ! -!Scroller class methodsFor:'defaults'! +!Scroller class methodsFor:'defaults'! handleLightFormOn:aDisplay "answer the form used for the handles light area; @@ -1797,13 +1797,14 @@ h := (device verticalPixelPerMillimeter asFloat * 6) rounded. ]. - ^ w @ h. + preferredExtent := w @ h. + ^ preferredExtent. - "Modified: 29.5.1996 / 12:10:42 / cg" + "Modified: 15.7.1996 / 09:56:07 / cg" ! ! -!Scroller class methodsFor:'documentation'! +!Scroller class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.62 1996-06-15 11:52:43 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg/Scroller.st,v 1.63 1996-07-15 10:08:11 cg Exp $' ! !