From: Simon Ruderich Date: Mon, 11 Mar 2013 16:18:31 +0000 (+0100) Subject: tig.pl: Print line when dieing. X-Git-Url: https://ruderich.org/simon/gitweb/?a=commitdiff_plain;h=4bf926384a26bbdbe7c6bb6476aa6093381667c8;p=config%2Fdotfiles.git tig.pl: Print line when dieing. --- diff --git a/tig.pl b/tig.pl index f753408..77b7d94 100755 --- a/tig.pl +++ b/tig.pl @@ -50,7 +50,7 @@ while (my $line = <$fh>) { } # Commit line. - $line =~ /^([ *|]+) (.+)\x00(.+)\x00(.+)\x00(.+)\x00(.*)$/ or die; + $line =~ /^([ *|]+) (.+)\x00(.+)\x00(.+)\x00(.+)\x00(.*)$/ or die $line; my $prefix = $1; my $hash = colored($2, $color_hash); my $date = POSIX::strftime('%Y-%m-%d', localtime($3));