--- a/ActiveHelpView.st	Fri Feb 14 01:37:14 2014 +0100
+++ b/ActiveHelpView.st	Tue Feb 18 15:21:54 2014 +0100
@@ -245,7 +245,7 @@
      p1 p2 p3 pB1 pB2 pB3 offs hEll h2 w2 w8 w78 mousePosition|
 
     (shapeStyle == #cartoon) ifTrue:[
-        device supportsArbitraryShapedViews ifTrue:[
+        self graphicsDevice supportsArbitraryShapedViews ifTrue:[
             extent := self extent.
             oldOrigin := self origin.
             h := extent y.
@@ -386,10 +386,10 @@
 !ActiveHelpView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.40 2013-09-19 16:29:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.41 2014-02-18 14:21:54 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.40 2013-09-19 16:29:21 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.41 2014-02-18 14:21:54 stefan Exp $'
 ! !