summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-02 04:24:22 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-02 04:24:22 +0000
commit35073f623b908d09df89c00c55fbf5a5a796a727 (patch)
tree244b9f262e17bc481bfbfbbfc61da99567cd54b1 /perl-install
parentf7c6029547ec9e0864ee040f32cb3b4c0af82c62 (diff)
downloaddrakx-35073f623b908d09df89c00c55fbf5a5a796a727.tar
drakx-35073f623b908d09df89c00c55fbf5a5a796a727.tar.gz
drakx-35073f623b908d09df89c00c55fbf5a5a796a727.tar.bz2
drakx-35073f623b908d09df89c00c55fbf5a5a796a727.tar.xz
drakx-35073f623b908d09df89c00c55fbf5a5a796a727.zip
(log_output) fix tag name (was harmfull but it's just saner anyway)
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/logdrake2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index fa6475bbc..3400c2d83 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -374,7 +374,7 @@ sub logcolorize {
# log_output (Gtk2::TextView, [ [ ... ] ])
sub log_output {
my ($text, $font, $col) = @_;
- my $tag = join($font, $col);
+ my $tag = join('', $font, $col);
push @logs, [ $text, $tag ];
$tags{$tag} ||= { if_($font, font => $font), foreground => $col };
}