paritybit.ca

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

commit d0b72807fb6c15b89a3fe41eb8d76a0041b471d8
parent 75081e9ae63ef4fe8afb25a796786e79dcdfc399
Author: Jake Bauer <jbauer@paritybit.ca>
Date:   Wed,  9 Oct 2019 18:23:50 -0400

Improve comments

Diffstat:
Mtuptime-update.pl | 6+++---
1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/tuptime-update.pl b/tuptime-update.pl @@ -26,10 +26,10 @@ my $inPreFlag = 0; my $arrIndex = 0; while (my $row = <$fh>) { chomp $row; - # Create a new tree to parse HTML tags from $row + # Create a new HTML tree to parse HTML tags from $row my $tr = HTML::TreeBuilder->new_from_content($row); - # If this line contains a <pre> tag, set the flag so we will begin printing + # If this line contains a <pre> tag, set the proper flag to begin printing # output from tuptime. if ($tr->find_by_tag_name('pre')) { $inPreFlag = 1; @@ -39,7 +39,7 @@ while (my $row = <$fh>) { } # Check if we have printed out every line from the output of tuptime if ($arrIndex == scalar @output) { - # Reset arrIndex so this if doesn't continue to resolve to true + # Reset arrIndex so the above doesn't continue to resolve to true $arrIndex = 0; $inPreFlag = 0; print "Exiting pre\n";