--- a/SimpleView.st	Wed May 28 11:36:34 2008 +0200
+++ b/SimpleView.st	Wed May 28 15:50:22 2008 +0200
@@ -9136,6 +9136,16 @@
     "Created: 13.9.1996 / 14:06:54 / cg"
 !
 
+pageLeft
+    self scrollLeft:(self innerWidth)
+
+    "Created: 13.9.1996 / 14:06:54 / cg"
+!
+
+pageRight
+    self scrollRight:(self innerWidth)
+!
+
 pageUp
     self scrollUp:(self innerHeight)
 
@@ -10120,7 +10130,7 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.581 2008-05-19 10:42:31 sr Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.582 2008-05-28 13:50:22 stefan Exp $'
 ! !
 
 SimpleView initialize!