diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-07-30 09:57:11 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-07-30 09:57:11 +0000 |
| commit | b6174d585ecea648891a6e7d21be42141a0a1212 (patch) | |
| tree | 8d3b0d81445d190b7907eccb3d83c1d4c67eb8db /perl-install/standalone/drakautoinst | |
| parent | 90d257cb974b2db9cf29b530c297efc7fb0d9b19 (diff) | |
| download | drakx-backup-do-not-use-b6174d585ecea648891a6e7d21be42141a0a1212.tar drakx-backup-do-not-use-b6174d585ecea648891a6e7d21be42141a0a1212.tar.gz drakx-backup-do-not-use-b6174d585ecea648891a6e7d21be42141a0a1212.tar.bz2 drakx-backup-do-not-use-b6174d585ecea648891a6e7d21be42141a0a1212.tar.xz drakx-backup-do-not-use-b6174d585ecea648891a6e7d21be42141a0a1212.zip | |
use $o->{interactiveSteps} instead of @install_steps_auto_install::graphical_steps
Diffstat (limited to 'perl-install/standalone/drakautoinst')
| -rwxr-xr-x | perl-install/standalone/drakautoinst | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/standalone/drakautoinst b/perl-install/standalone/drakautoinst index 54e0fd139..73e57ee8a 100755 --- a/perl-install/standalone/drakautoinst +++ b/perl-install/standalone/drakautoinst @@ -220,6 +220,8 @@ if (!$::isEmbedded && $in->isa('interactive::gtk')) { # $W->destroy(); } +$o->{interactiveSteps} = \@manual_steps; + my $str = join('', "#!/usr/bin/perl -cw # @@ -229,12 +231,7 @@ my $str = join('', # You can do this with 'perl -cw auto_inst.cfg.pl' or by executing this file # (note the '#!/usr/bin/perl -cw' on the first line). ", - Data::Dumper->Dump([$o], ['$o']), q( -package install_steps_auto_install; -$graphical = 1; -), Data::Dumper->Dump([\@manual_steps], ['$msteps']), -q(push @graphical_steps, @$msteps; -), "\0"); + Data::Dumper->Dump([$o], ['$o']), "\0"); $str =~ s/ {8}/\t/g; #- replace all 8 space char by only one tabulation, this reduces file size so much :-) output($cfgfile, $str); @@ -368,6 +365,9 @@ sub control_buttons { #------------------------------------------------- #- $Log$ +#- Revision 1.20 2002/07/30 09:57:11 prigaux +#- use $o->{interactiveSteps} instead of @install_steps_auto_install::graphical_steps +#- #- Revision 1.19 2002/07/23 10:35:55 tvignaud #- - Big Move 1: interactive::* hierarchy #- |