From 8bc714517c06fbc1faea6c4eabf3e22e93be31da Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 17 Aug 2001 23:43:23 +0000 Subject: fix typo --- perl-install/standalone/interactive_http/interactive_http.cgi | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone/interactive_http') diff --git a/perl-install/standalone/interactive_http/interactive_http.cgi b/perl-install/standalone/interactive_http/interactive_http.cgi index 48dd06fb8..935a4a765 100755 --- a/perl-install/standalone/interactive_http/interactive_http.cgi +++ b/perl-install/standalone/interactive_http/interactive_http.cgi @@ -62,7 +62,7 @@ sub force_exit_dead_prog { sub spawn_server { my ($prog) = @_; - my @authorised_progs = map { chomp($_) } cat_('/etc/drakxtools_http/authorised_progs'); + my @authorised_progs = map { chomp_($_) } cat_('/etc/drakxtools_http/authorised_progs'); member($prog, @authorised_progs) or error("You tried to call a non-authorised program"); fork and return; -- cgit v1.2.1