summaryrefslogtreecommitdiffstats
path: root/perl-install/run_program.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-06-03 12:08:35 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-06-03 12:08:35 +0000
commit337801868e55146ca66221654d6295d0e24b01a7 (patch)
tree9bf0de3ebd466995f98b59cae762b08a868e96d7 /perl-install/run_program.pm
parentf9ee79ed64ed8ad891671e9920ef945f5bd5eca5 (diff)
downloaddrakx-backup-do-not-use-337801868e55146ca66221654d6295d0e24b01a7.tar
drakx-backup-do-not-use-337801868e55146ca66221654d6295d0e24b01a7.tar.gz
drakx-backup-do-not-use-337801868e55146ca66221654d6295d0e24b01a7.tar.bz2
drakx-backup-do-not-use-337801868e55146ca66221654d6295d0e24b01a7.tar.xz
drakx-backup-do-not-use-337801868e55146ca66221654d6295d0e24b01a7.zip
no_comment
Diffstat (limited to 'perl-install/run_program.pm')
-rw-r--r--perl-install/run_program.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/run_program.pm b/perl-install/run_program.pm
index 38fdbf8a9..73d8a9995 100644
--- a/perl-install/run_program.pm
+++ b/perl-install/run_program.pm
@@ -33,12 +33,12 @@ sub rooted {
$stderrm =~ s/2//;
open STDERR, "$stderrm $root$stderr" or die "run_program can't output in $root$stderr (mode `$stderrm')";
} else {
- open STDERR, ">> /dev/tty7" or open STDERR, ">> /tmp/exec.log" or die "run_program can't log, give me access to /tmp/exec.log";
+ open STDERR, ">> /tmp/exec.log" or open STDOUT, ">> /dev/tty7" or die "run_program can't log, give me access to /tmp/exec.log";
}
if ($stdout) {
open STDOUT, "$stdoutm $root$stdout" or die "run_program can't output in $root$stdout (mode `$stdoutm')";
} else {
- open STDOUT, ">> /dev/tty7" or open STDOUT, ">> /tmp/exec.log" or die "run_program can't log, give me access to /tmp/exec.log";
+ open STDOUT, ">> /tmp/exec.log" or open STDOUT, ">> /dev/tty7" or die "run_program can't log, give me access to /tmp/exec.log";
}
$root and chroot $root;