From: Simon Ruderich Date: Sat, 22 Mar 2014 21:46:25 +0000 (+0100) Subject: bin/tig.pl: remove unnecessary variable X-Git-Url: https://ruderich.org/simon/gitweb/?a=commitdiff_plain;h=11b86563f4b8a9eeda0940635f05f169bfe150c6;p=config%2Fdotfiles.git bin/tig.pl: remove unnecessary variable --- diff --git a/bin/tig.pl b/bin/tig.pl index bde17f3..881583d 100755 --- a/bin/tig.pl +++ b/bin/tig.pl @@ -68,16 +68,15 @@ if (-t STDOUT and defined $pager) { open STDOUT, '|-', $pager or die $!; } -while (my $line = <$fh>) { +while (<$fh>) { # History graph line. - if ($line =~ m{^([|/\\_ ]+)$}) { - print colored($line, $color_graph); + if (m{^([|/\\_ ]+)$}) { + print colored($_, $color_graph); next; } # Commit line. - $line =~ /^([ *|.\\-]+)\x00(.+)\x00(.+)\x00(.+)\x00(.*)\x00(.*)$/ - or die $line; + /^([ *|.\\-]+)\x00(.+)\x00(.+)\x00(.+)\x00(.*)\x00(.*)$/ or die $_; my $prefix = $1; my $hash = colored($2, $color_hash); my $date = POSIX::strftime('%Y-%m-%d', localtime($3));