From a5961eb9e6773583860d8bb196ca9a0db9582bdd Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Wed, 10 Feb 2016 01:50:12 +0000
Subject: [PATCH] commitid: in Small with commitid, show start rather than end
 of commitid

---
 commitid.scad.pl | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/commitid.scad.pl b/commitid.scad.pl
index 983a4ab..35bc341 100755
--- a/commitid.scad.pl
+++ b/commitid.scad.pl
@@ -538,11 +538,11 @@ sub do_git () {
 
 	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 = rjustt($forgitobj, $git_object).
+		    ($git_dirty || ' ').
+		    $git_count;
 	    }
 	    genform_plusq("Small$sz", $smallstr);
 	}
-- 
2.30.2