diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-02 04:24:22 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-02 04:24:22 +0000 |
| commit | 35073f623b908d09df89c00c55fbf5a5a796a727 (patch) | |
| tree | 244b9f262e17bc481bfbfbbfc61da99567cd54b1 /perl-install/standalone | |
| parent | f7c6029547ec9e0864ee040f32cb3b4c0af82c62 (diff) | |
| download | drakx-backup-do-not-use-35073f623b908d09df89c00c55fbf5a5a796a727.tar drakx-backup-do-not-use-35073f623b908d09df89c00c55fbf5a5a796a727.tar.gz drakx-backup-do-not-use-35073f623b908d09df89c00c55fbf5a5a796a727.tar.bz2 drakx-backup-do-not-use-35073f623b908d09df89c00c55fbf5a5a796a727.tar.xz drakx-backup-do-not-use-35073f623b908d09df89c00c55fbf5a5a796a727.zip | |
(log_output) fix tag name (was harmfull but it's just saner anyway)
Diffstat (limited to 'perl-install/standalone')
| -rwxr-xr-x | perl-install/standalone/logdrake | 2 |
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 }; } |