X-Git-Url: https://ruderich.org/simon/gitweb/?a=blobdiff_plain;f=tig.pl;h=5fc7625ea46ff91162aab61c897dc3fdc06790f3;hb=038da645d825eb46018d0e92317594e54b37250e;hp=f753408bba21d20eb89af891c55b82e19578349f;hpb=057f0180cb8a22b279e7ebbb24ddd50dc1881750;p=config%2Fdotfiles.git diff --git a/tig.pl b/tig.pl index f753408..5fc7625 100755 --- a/tig.pl +++ b/tig.pl @@ -34,7 +34,8 @@ my $color_ref_reference = 'red bold'; my $color_author = 'magenta'; -my $format = '%h' . '%x00' # abbreviated commit hash +my $format = '%x00' # separator from --graph + . '%h' . '%x00' # abbreviated commit hash . '%at' . '%x00' # author date . '%an' . '%x00' # author name . '%s' . '%x00' # subject @@ -50,7 +51,8 @@ while (my $line = <$fh>) { } # Commit line. - $line =~ /^([ *|]+) (.+)\x00(.+)\x00(.+)\x00(.+)\x00(.*)$/ or die; + $line =~ /^([ *|]+)\x00(.+)\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)); @@ -58,6 +60,8 @@ while (my $line = <$fh>) { my $message = $5; my $refs = $6; + # Strip trailing whitespace. + $prefix =~ s/\s+$//; # Color "graph". $prefix =~ s/\|/colored($&, $color_graph)/ge;