latin: further offset colour circles
[sheet.git] / writing-latn.inc.pl
index 02fdda7907e56e0f8d5c371927e8af2f70dff915..525daf2ed41b65d0e45b93460e836acaf703f7a7 100644 (file)
@@ -79,11 +79,11 @@ sub disphues {
        my @lumf = $opaque ? ('hsl(%s,100%%,50%%)', 'hsl(%s,100%%,25%%)') :
                ('hsl(%s,100%%,50%%)', 'hsla(%s,100%%,50%%,.5)');
        return sprintf(
-               '<svg width="16" height="16" viewBox="0 0 22 22">%s</svg>',
+               '<svg width="16" height="16" viewBox="0 0 12 12">%s</svg>',
                join '', map {
                        my $colf = $lumf[ $lum[$_] ];
                        !$colf ? () : sprintf('<circle cx="%d" cy="%d" r="%d" fill="%s"/>',
-                               10 + $_, $_ == 1 ? 12 : 10, 10, sprintf($colf, $hues->[$_])
+                               5 + $_, $_ == 1 ? 7 : 5, 5, sprintf($colf, $hues->[$_])
                        );
                } 0 .. 2
        );