private.rc
changeset 209 22793de5d56e
parent 204 69f81ca32823
child 216 784202865f5f
--- a/private.rc	Fri Apr 18 18:40:36 1997 +0200
+++ b/private.rc	Mon Apr 21 11:29:10 1997 +0200
@@ -1,6 +1,8 @@
 "*
  * $Header$
  *
+ * ST/X startup configuration & command file:
+ *
  * sample private.rc - file
  *
  * a copy of this file can (should) reside in $home/.smalltalk/private.rc or
@@ -69,9 +71,12 @@
 "/ no matter what the 'display.rc' says:
 "/     I want my #iris style ...
 "/
-View defaultStyle:#iris.
+Display hasGrayscales ifTrue:[
+    View defaultStyle:#iris.
 "/ View defaultStyle:#motif.
-
+] ifFalse:[
+    View defaultStyle:#normal
+].
 
 
 "/ add my private directories to the searchPath ...