chiark / gitweb /
commitid.scad.pl: Make overlap fudge bigger to avoid openscad stupidity
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Thu, 4 Feb 2016 20:29:21 +0000 (20:29 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Thu, 4 Feb 2016 20:29:21 +0000 (20:29 +0000)
commitid.scad.pl

index a6ef9a5..375d2eb 100755 (executable)
@@ -92,8 +92,8 @@ sub parsefont () {
                    } elsif (s{^\S}{}) {
                        my $f = $cellmap{$&};
                        die unless $f;
-                       $f =~ s/\b\d/ sprintf '%05d', $col*4000 + $&*2001 /ge;
-                       $f =~ s/\d\b/ sprintf '%05d', $row*4000 + $&*2001 /ge;
+                       $f =~ s/\b\d/ sprintf '%05d', $col*4000 + $&*2050 /ge;
+                       $f =~ s/\d\b/ sprintf '%05d', $row*4000 + $&*2050 /ge;
                        push @{ $chrpolys{$chr} }, [ split / /, $f ];
                    } else {
                        die "$_ ?";