diff -r 55f92509b8fb -r 102963c568a9 ListView.st --- a/ListView.st Wed Dec 15 11:54:57 2010 +0100 +++ b/ListView.st Wed Dec 15 11:55:24 2010 +0100 @@ -3586,21 +3586,21 @@ ! pageDown - "change origin to display next page" - - super pageDown + "change origin to display the next page" + "/ self scrollTo:(viewOrigin + (0 @ height)) - - "Modified: / 15-12-2010 / 10:06:19 / cg" + self scrollToLine:(self firstLineShown + nFullLinesShown) + + "Modified: / 15-12-2010 / 10:12:37 / cg" ! pageUp - "change origin to display previous page" - - super pageUp + "change origin to display the previous page" + "/ self scrollTo:(viewOrigin - (0 @ height)) - - "Modified: / 15-12-2010 / 10:05:37 / cg" + self scrollToLine:(self firstLineShown - nFullLinesShown) + + "Modified: / 15-12-2010 / 10:12:41 / cg" ! scrollDown:nLines @@ -4632,9 +4632,9 @@ !ListView class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.342 2010-12-15 09:06:44 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.343 2010-12-15 10:55:24 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.342 2010-12-15 09:06:44 cg Exp $' + ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.343 2010-12-15 10:55:24 cg Exp $' ! !