summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2002-08-29 13:17:00 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2002-08-29 13:17:00 +0000
commitcc6a37a86957f0c3b31dc4b85c6ff36095bd9858 (patch)
tree833c20c11c60a13d51ccc232e1519bb2d211f852 /perl-install
parent2e5147b4d036784dbe104e6f2cb6fd605af4803f (diff)
downloaddrakx-cc6a37a86957f0c3b31dc4b85c6ff36095bd9858.tar
drakx-cc6a37a86957f0c3b31dc4b85c6ff36095bd9858.tar.gz
drakx-cc6a37a86957f0c3b31dc4b85c6ff36095bd9858.tar.bz2
drakx-cc6a37a86957f0c3b31dc4b85c6ff36095bd9858.tar.xz
drakx-cc6a37a86957f0c3b31dc4b85c6ff36095bd9858.zip
in explain mode, don't display day and hostname to have more
space for the rest
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/logdrake6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index 5603e8083..bdedf0073 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -329,12 +329,12 @@ sub input_callback {
sub logcolorize {
# we get date & time if it is date & time (dmesg)
- s/(\D{3} .. \d\d:\d\d:\d\d )//;
- $timestamp = $1;
+ s/(\D{3} .. (\d\d:\d\d:\d\d ))//;
+ $timestamp = $::isExplain ? $2 : $1;
@rec = split;
log_output($cyan,$timestamp,$b); # date & time if any...
- log_output(($rec[0] eq $h) ? $blue : $col,"$rec[0] ",$b); # hostname
+ $::isExplain or log_output(($rec[0] eq $h) ? $blue : $col,"$rec[0] ",$b); # hostname
if ($rec[1] eq "last") {
log_output($green," last message repeated ",$n);