--- a/SettingsDialog.st	Tue Dec 02 18:42:40 2014 +0100
+++ b/SettingsDialog.st	Tue Dec 02 18:46:00 2014 +0100
@@ -754,9 +754,11 @@
     item application help.
 !
 
-reopenLauncher
-    self requestor notNil ifTrue:[
-        self requestor reopenLauncher.
+reopenLauncher          
+    |app|
+
+    (app := self requestor) notNil ifTrue:[
+        app reopenLauncher.
     ] ifFalse:[
         NewLauncher current reopenLauncher.
     ].
@@ -1960,11 +1962,11 @@
 !SettingsDialog class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.122 2014-11-20 14:27:13 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.123 2014-12-02 17:46:00 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.122 2014-11-20 14:27:13 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SettingsDialog.st,v 1.123 2014-12-02 17:46:00 cg Exp $'
 ! !