--- a/smalltalk_r.rc Mon May 13 13:12:33 2002 +0200
+++ b/smalltalk_r.rc Tue May 21 10:16:25 2002 +0200
@@ -11,9 +11,17 @@
"/ is restarted. Usually, everything should stay as it was,
"/ except for things like keyboard mapping (if running on another display)
"/
-"/ notice, that all views and things have already been restored when this
-"/ script is run ....
-"/
+
+"/ first, restart the Display connection
+Display notNil ifTrue:[
+ (Display reinitializeFor:Screen defaultDisplayName) isNil ifTrue:[
+ 'smalltalk_r.rc [error]: Cannot restart connection to: ' errorPrint.
+ Screen defaultDisplayName errorPrintCR.
+ Smalltalk exit.
+ ].
+].
+"/ Tell smalltalk, that the display may be used now.
+Smalltalk displayInitializationDone.
"/
"/ this handles all variant display stuff