--- a/ActiveHelpView.st	Wed Apr 09 20:45:40 2008 +0200
+++ b/ActiveHelpView.st	Fri Apr 11 15:16:33 2008 +0200
@@ -9,9 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
-
 "{ Package: 'stx:libview2' }"
 
 View subclass:#ActiveHelpView
@@ -234,14 +231,14 @@
             bw := 4.
             offs := 0.
 
-            self corner x > device width ifTrue:[
+            self corner x > device usableExtent x ifTrue:[
                 mirrorH := true.
                 self origin:((self origin x - w) @ (self origin y)).
                 offs := bw * 2.
             ] ifFalse:[
                 mirrorH := false
             ].
-            self corner y > device height ifTrue:[
+            self corner y > device usableExtent y ifTrue:[
                 mirrorV := true.
                 self origin:(self origin x @ (self origin y - h)).
             ] ifFalse:[
@@ -360,5 +357,5 @@
 !ActiveHelpView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.28 2003-03-12 11:33:45 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.29 2008-04-11 13:16:33 cg Exp $'
 ! !