diff options
Diffstat (limited to 'perl-install/Xconfigurator.pm')
| -rw-r--r-- | perl-install/Xconfigurator.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index eb3186fcb..afbd93da4 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -473,6 +473,10 @@ sub testFinalConfig($;$$) { 1; }); + my $background = "$prefix/usr/share/pixmaps/mdk/mandrake-logo.xpm"; + my $qiv = "$prefix/usr/bin/qiv"; + -r $background && -x $setroot and + system(($::testing ? "$prefix" : "chroot $prefix/ ") . "$qiv --display :9 -y $background"); exit (interactive_gtk->new->ask_yesorno('', [ _("Is this the correct setting?"), $text ], 0) ? 0 : 222); }; my $rc = close F; |