SimpleView.st
changeset 3924 758fb7f352f0
parent 3923 5e0345a32742
child 3926 1cb12f8cda73
--- a/SimpleView.st	Mon Aug 18 19:19:26 2003 +0200
+++ b/SimpleView.st	Mon Aug 18 19:53:09 2003 +0200
@@ -1134,7 +1134,10 @@
     "return the view style sheet information (a dictionary)"
 
     StyleSheet isNil ifTrue:[
-        self updateAllStyleCaches
+        self updateAllStyleCaches.
+        StyleSheet isNil ifTrue:[
+            'SimpleView [warning]: cannot read styleSheet' infoPrintCR.
+        ]
     ].
     ^ StyleSheet
 
@@ -9401,7 +9404,7 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.479 2003-08-18 17:19:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.480 2003-08-18 17:53:09 cg Exp $'
 ! !
 
 SimpleView initialize!