if (defined($git_count)) {
my $smallstr = rjustt($sz, $git_count, $git_dirty);
- if (defined($git_object) && $sz >= length($git_count) + 3) {
- $smallstr = $git_object;
- $smallstr .= ($git_dirty || ' ');
- $smallstr .= $git_count;
- $smallstr = rjustt($sz, $smallstr);
+ my $forgitobj = $sz - length($git_count) - 1;
+ if (defined($git_object) && $forgitobj >= 2) {
+ $smallstr = ljustt($forgitobj, $git_object).
+ ($git_dirty || ' ').
+ $git_count;
}
genform_plusq("Small$sz", $smallstr);
}