diff -r d72c8e4f7684 -r 38845952e1d4 ActiveHelpView.st --- a/ActiveHelpView.st Mon Sep 16 12:56:13 2013 +0200 +++ b/ActiveHelpView.st Mon Sep 16 12:56:18 2013 +0200 @@ -234,8 +234,8 @@ |extent oldOrigin shapeForm borderForm y1 bw h w mirrorH mirrorV p1 p2 p3 pB1 pB2 pB3 offs hEll h2 w2 w8 w78 mousePosition| - device supportsArbitraryShapedViews ifTrue:[ - (shapeStyle == #cartoon) ifTrue:[ + (shapeStyle == #cartoon) ifTrue:[ + device supportsArbitraryShapedViews ifTrue:[ extent := self extent. oldOrigin := self origin. h := extent y. @@ -372,10 +372,10 @@ !ActiveHelpView class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.38 2013-09-12 13:17:56 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.39 2013-09-16 10:56:18 cg Exp $' ! version_CVS - ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.38 2013-09-12 13:17:56 cg Exp $' + ^ '$Header: /cvs/stx/stx/libview2/ActiveHelpView.st,v 1.39 2013-09-16 10:56:18 cg Exp $' ! !