summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rwxr-xr-xperl-install/standalone/logdrake14
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index 4c4342558..bb0fe3e0a 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -280,13 +280,13 @@ sub parse_file {
if ($isTail) {
close $F if $F;
if (open $F, $file) {
- local $_;
- while (<$F>) {} #to prevent to output the file twice..
-# $log_text->set_point($log_text->get_length());
- $timer ||= Glib::Timeout->add(1000, sub {
- logcolorize($_) while <$F>;
- seek $F, 0, 1;
- });
+ local $_;
+ while (<$F>) {} #to prevent to output the file twice..
+ # $log_text->set_point($log_text->get_length());
+ $timer ||= Glib::Timeout->add(1000, sub {
+ logcolorize($_) while <$F>;
+ seek $F, 0, 1;
+ });
} else {
my $error = $!;
my $string = chomp_(`LC_ALL=C date '+%b %d %T'`) . " " .