diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-12-21 01:25:00 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-12-21 01:25:00 +0000 |
commit | 3401eeed7427026c5354496bdbbdcfc6f18b38b3 (patch) | |
tree | 423c658f22e69b91e263044ed9848499f5e1172d /perl-install/install_steps_gtk.pm | |
parent | dc9ba01917bf001fe0d5975f167cbb0ded79aa11 (diff) | |
download | drakx-3401eeed7427026c5354496bdbbdcfc6f18b38b3.tar drakx-3401eeed7427026c5354496bdbbdcfc6f18b38b3.tar.gz drakx-3401eeed7427026c5354496bdbbdcfc6f18b38b3.tar.bz2 drakx-3401eeed7427026c5354496bdbbdcfc6f18b38b3.tar.xz drakx-3401eeed7427026c5354496bdbbdcfc6f18b38b3.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index aa72c0527..3414c39af 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -681,12 +681,20 @@ sub create_help_window { #- 1, createScrolledWindow($w_help = new Gtk::XmHTML))); 1, createScrolledWindow($w_help = new Gtk::Text))); #- $w_help->source($o->{step} ? translate($o->{steps}{$o->{step}}{help}) : ''); - gtktext_insert($w_help, $o->{step} ? formatAlaTeX(translate($o->{steps}{$o->{step}}{help})) : ''); + gtktext_insert($w_help, $o->{step} ? formatAlaTeX(translate($help::steps{$o->{step}})) : ''); $w->show; $o->{help_window} = $w; } +sub set_help { + shift; + gtktext_insert($w_help, + formatAlaTeX(join "\n", + map { translate($help::steps{$_}) } @_)); + 1; +} + #------------------------------------------------------------------------------ sub create_steps_window { my ($o) = @_; |