diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-04-20 12:48:48 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-04-20 12:48:48 +0000 |
| commit | c14cbfc9770053f195c74dcb1404bfa10c9da75f (patch) | |
| tree | dfa3d4024251d99ec5ebd6384f2b0e9b00d7da7c /perl-install/install_steps_gtk.pm | |
| parent | 06ef0920b41b391d4d3953b03c4fd266872dcd82 (diff) | |
| download | drakx-c14cbfc9770053f195c74dcb1404bfa10c9da75f.tar drakx-c14cbfc9770053f195c74dcb1404bfa10c9da75f.tar.gz drakx-c14cbfc9770053f195c74dcb1404bfa10c9da75f.tar.bz2 drakx-c14cbfc9770053f195c74dcb1404bfa10c9da75f.tar.xz drakx-c14cbfc9770053f195c74dcb1404bfa10c9da75f.zip | |
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 0078ec6a1..0a68e27ec 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -333,8 +333,7 @@ a percentage of %d%% will install as many packages as possible.", $percentage, $ ) ); $spin->signal_connect(changed => my $changed = sub { - $val = $spin->get_value_as_int / 100 * $max_size; - log::l("val $val ", pkgs::correctSize($val / sqr(1024))); + $val = $spin->get_value_as_int / 100 * $max_size_; $mb->set(sprintf("(%dMB)", pkgs::correctSize($val / sqr(1024)))); }); &$changed(); $spin->signal_connect(activate => sub { $w->{retval} = 1; Gtk->main_quit }); |