diff options
Diffstat (limited to 'perl-install/standalone/display_installer_help')
| -rwxr-xr-x | perl-install/standalone/display_installer_help | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/perl-install/standalone/display_installer_help b/perl-install/standalone/display_installer_help index 09c6bae31..b33199beb 100755 --- a/perl-install/standalone/display_installer_help +++ b/perl-install/standalone/display_installer_help @@ -20,11 +20,21 @@ use lib qw(/usr/lib/libDrakX); use interactive; use any; +use lang; +use Gtk3::WebKit2; + +# so that screenshots works: +$::prefix = '/mnt'; +use install::any; +$::isInstall = 1; my $in = 'interactive'->vnew('su'); # so that we popup above drakx: any::set_wm_hints_if_needed($in); # Fake enough $o for retrieving the proper translation: -$o->{locale}{lang} = $ARGV[1]; +$::o = $in; +$::o->{locale}{lang} = $ARGV[1]; +lang::set($::o->{locale}); + $in->display_help_window({ interactive_help_id => $ARGV[0] }); |
