summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/XFdrake2
-rwxr-xr-xperl-install/standalone/draknet2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/XFdrake b/perl-install/standalone/XFdrake
index 7c3a5d13b..16bb03c16 100755
--- a/perl-install/standalone/XFdrake
+++ b/perl-install/standalone/XFdrake
@@ -55,7 +55,7 @@ system("mount /proc 2>/dev/null"); # ensure /proc is mounted for pci probing
Xconfig::getinfoFromXF86Config($i) if $0 =~ Xdrakres;
Xconfig::getinfo($i);
-Xconfigurator::main('', $i, $in, 0, \&standalone::pkgs_install);
+Xconfigurator::main('', $i, $in, 0, sub { $in->standalone::pkgs_install(@_) });
!$::isEmbedded and $in->exit(0);
kill(USR1, $::CCPID);
#goto begin;
diff --git a/perl-install/standalone/draknet b/perl-install/standalone/draknet
index f198b1b1c..26591470e 100755
--- a/perl-install/standalone/draknet
+++ b/perl-install/standalone/draknet
@@ -169,7 +169,7 @@ $window1->show_all();
Gtk->main;
dd:
-netconnect::intro('', $netcnx, $in, \&standalone::pkgs_install);
+netconnect::intro('', $netcnx, $in, sub { $in->standalone::pkgs_install(@_) });
$in->exit(0);
sub get_profiles {