From a158b97ff3889c7ff1253f447c424fb052ae419a Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Thu, 9 Feb 2006 11:26:54 +0000 Subject: Log calls to urpmi and urpme --- urpme | 7 ++++++- urpmi | 4 ++++ 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/urpme b/urpme index 4585855b..12fe0cd1 100644 --- a/urpme +++ b/urpme @@ -27,7 +27,7 @@ use urpm::msg; $ENV{PATH} = "/sbin:/usr/sbin:/bin:/usr/bin:/usr/X11R6/bin"; delete @ENV{qw(ENV BASH_ENV IFS CDPATH)}; -our ($root, $test, $parallel, $auto, $matches, $verbose, $maymatch, $usedistrib, $force, $noscripts, @l); +our ($root, $test, $parallel, $auto, $matches, $verbose, $usedistrib, $force, $noscripts, @l); # Translator: Add here the keys which might be pressed in the "No"-case. my $noexpr = N("Nn"); # Translator: Add here the keys which might be pressed in the "Yes"-case. @@ -55,6 +55,7 @@ usage: } @ARGV or usage; +my @origARGV = @ARGV; urpm::args::parse_cmdline(); @l = @ARGV; @@ -68,6 +69,10 @@ if ($< && !$test) { $urpm->{fatal}(1, N("Only superuser is allowed to remove packages")); } +unless ($test) { + sys_log("called with: @origARGV"); +} + #- just configure parallel mode if available. $urpm->configure( synthesis => ($parallel ? 'none' : ''), diff --git a/urpmi b/urpmi index 6dd0cf08..f6baca16 100755 --- a/urpmi +++ b/urpmi @@ -247,6 +247,10 @@ unless ($bug || $install_src || $env || $urpm->{options}{'allow-force'} || $root Use --allow-force to force operation.", $urpm::sys::mountpoint)); } +unless ($bug || $env || $test) { + sys_log("called with: $command_line"); +} + my ($pid_out, $pid_err); if ($logfile && !$INC{"Devel/Trace.pm"}) { bug_log(scalar localtime, " urpmi called with $command_line\n"); -- cgit v1.2.1