--- a/ViewStyle.st	Wed Dec 01 20:26:43 1999 +0100
+++ b/ViewStyle.st	Wed Dec 01 20:46:48 1999 +0100
@@ -69,7 +69,7 @@
     dir := Smalltalk getResourceFileName:aFileName.
     dir isNil ifTrue:[
         "/ then search in the classes package directory ...
-        dir := Smalltalk projectDirectoryForClass:View.
+        dir := Smalltalk projectDirectoryForPackage:'stx:libview'.
         dir notNil ifTrue:[
             dir := dir , '/resources'
         ].
@@ -215,5 +215,5 @@
 !ViewStyle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ViewStyle.st,v 1.21 1999-12-01 19:26:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ViewStyle.st,v 1.22 1999-12-01 19:46:48 cg Exp $'
 ! !