From 1d34fbffe86a397e1160689c0ab04023eb78e053 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 15 Sep 2003 14:03:14 +0000 Subject: - call any::ask_window_manager_to_logout() after forking so that exit doesn't happen before it is done (otherwise it can loose Xauth access) - fix checking config_changed (it can be string 'config_changed' or the new $raw_X) --- perl-install/standalone/XFdrake | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone/XFdrake b/perl-install/standalone/XFdrake index 6b0adb4aa..6f88662cd 100755 --- a/perl-install/standalone/XFdrake +++ b/perl-install/standalone/XFdrake @@ -57,7 +57,7 @@ $configure_this ||= 'everything'; Xconfig::main::configure_resolution($in, Xconfig::xfree->read); } }; - $rc && $rc eq 'config_changed' and ask_for_X_restart($in); + ask_for_X_restart($in) if $rc; $in->exit(0); } @@ -92,8 +92,10 @@ sub ask_for_X_restart { $in->ask_okcancel('', N("You need to log out and back in again for changes to take effect"), 1) or return; - fork() and return; - any::ask_window_manager_to_logout($wm); + if (fork()) { + any::ask_window_manager_to_logout($wm); + return; + } open STDIN, "/dev/null"; -- cgit v1.2.1