From 6cc979271a02e5d5be185711e51b099c566c6db6 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 10 Nov 2004 14:06:35 +0000 Subject: fix logdrake speed (should have been commited long time ago) --- perl-install/standalone/logdrake | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/standalone/logdrake') diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index eca83ced2..df4751115 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -348,7 +348,7 @@ sub log_output { my ($text, $font, $col) = @_; my $tag = join('', $font, $col); push @logs, [ $text, $tag ]; - $log_buf->{tags}{$tag} ||= { if_($font, font => $font), foreground => $col }; + $log_buf->{tags}{$tag} ||= { foreground => $col }; # if_($font, font => $font), } sub insert_text_n_scroll() { -- cgit v1.2.1