From 163afca19772aa8e9e24217ec1d96115fb811f62 Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Fri, 1 Jul 2005 01:51:07 +0000 Subject: When invoked without argumnents, assume --help --- rurpmi | 1 + 1 file changed, 1 insertion(+) (limited to 'rurpmi') diff --git a/rurpmi b/rurpmi index ba31c9d7..aa10fcb8 100644 --- a/rurpmi +++ b/rurpmi @@ -13,4 +13,5 @@ $ENV{PATH} = "/sbin:/usr/sbin:/bin:/usr/bin:/usr/X11R6/bin"; delete @ENV{qw(ENV BASH_ENV IFS CDPATH PERLLIB PERL5LIB PERL5OPT PERLIO PERLIO_DEBUG PERL5DB PERL_ENCODING PERL_HASH_SEED PERL_SIGNALS PERL_UNICODE)}; print STDERR N("Running urpmi in restricted mode..."), "\n"; +@ARGV or @ARGV = qw(--help); exec '/usr/bin/perl', '/usr/sbin/urpmi', '--restricted', map { untaint $_ } @ARGV; -- cgit v1.2.1