From 4a0d2a318e1cfcbcc54ef373ea97bdd2af63d8e6 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 14 Aug 2001 21:52:42 +0000 Subject: cleanup (it was working, but wasn't nice) --- perl-install/services.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/services.pm') diff --git a/perl-install/services.pm b/perl-install/services.pm index d1d9ab783..61984bbfb 100644 --- a/perl-install/services.pm +++ b/perl-install/services.pm @@ -115,7 +115,7 @@ sub ask_install_simple { _("Choose which services should be automatically started at boot time"), { list => $l, - help => sub { description($_, $prefix) }, + help => sub { description($_[0], $prefix) }, values => $on_services, sort => 1, }); -- cgit v1.2.1