diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-01-07 14:49:21 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-01-07 14:49:21 +0000 |
commit | 3fe04f038cbadfb74bd41809c1cb7e67af6c2f03 (patch) | |
tree | 537d49047b89cf08c749a1cf0100e7306cf9dde3 /perl-install/install_steps_gtk.pm | |
parent | 057cd219ea373e1766e1e40550ad52be28ad20c0 (diff) | |
download | drakx-3fe04f038cbadfb74bd41809c1cb7e67af6c2f03.tar drakx-3fe04f038cbadfb74bd41809c1cb7e67af6c2f03.tar.gz drakx-3fe04f038cbadfb74bd41809c1cb7e67af6c2f03.tar.bz2 drakx-3fe04f038cbadfb74bd41809c1cb7e67af6c2f03.tar.xz drakx-3fe04f038cbadfb74bd41809c1cb7e67af6c2f03.zip |
(installPackages): autoflush stdout before beeping
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index c76d93489..332ec88ea 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -531,7 +531,7 @@ sub installPackages { $method eq 'cdrom' and do { local $my_gtk::grab = 1; my $name = pkgs::mediumDescr($o->{packages}, $medium); - print "\a"; + local $| = 1; print "\a"; my $time = time(); my $r = $name !~ /Application/ || ($o->{useless_thing_accepted2} ||= $o->ask_from_list_('', formatAlaTeX(_(" Warning |