summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2007-08-02 17:06:02 +0000
committerThierry Vignaud <tv@mandriva.org>2007-08-02 17:06:02 +0000
commit5ed8532cf94b54ea1d1e93b840c7ee6c42f08e85 (patch)
tree177f28953c681a879431e4701e2a75a09560dd22 /perl-install
parent18c88cc687dd7934896044041ab3ce26cd316003 (diff)
downloaddrakx-5ed8532cf94b54ea1d1e93b840c7ee6c42f08e85.tar
drakx-5ed8532cf94b54ea1d1e93b840c7ee6c42f08e85.tar.gz
drakx-5ed8532cf94b54ea1d1e93b840c7ee6c42f08e85.tar.bz2
drakx-5ed8532cf94b54ea1d1e93b840c7ee6c42f08e85.tar.xz
drakx-5ed8532cf94b54ea1d1e93b840c7ee6c42f08e85.zip
reindent now that we added a if() { } block
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'`) . " " .