--- a/smalltalk.rc Thu Jun 15 17:18:35 2000 +0200
+++ b/smalltalk.rc Wed Jul 05 18:46:53 2000 +0200
@@ -429,15 +429,17 @@
'smalltalk.rc [info]: reading ''private.rc'' ...' infoPrintCR.
Smalltalk fileIn:'private.rc'.
-"/
-"/ read saved configuration settings (if any)
-"/
-"/ 'smalltalk.rc [info]: reading ''settings.stx'' ...' infoPrintCR.
-Object abortSignal handle:[:ex |
- ex return
-] do:[
- (Smalltalk fileIn:'settings.stx') ifTrue:[
- 'smalltalk.rc [info]: loaded preferences from ''settings.stx''' infoPrintCR.
+DeviceWorkstation notNil ifTrue:[
+ "/
+ "/ read saved configuration settings (if any)
+ "/
+ "/ 'smalltalk.rc [info]: reading ''settings.stx'' ...' infoPrintCR.
+ Object abortSignal handle:[:ex |
+ ex return
+ ] do:[
+ (Smalltalk fileIn:'settings.stx') ifTrue:[
+ 'smalltalk.rc [info]: loaded preferences from ''settings.stx''' infoPrintCR.
+ ]
]
]
!