X-Git-Url: https://git.ktnx.net/?p=mobile-ledger.git;a=blobdiff_plain;f=tools%2Fgen-styles;h=d158d8bf370e227e5b9894c9a39b8c02558006dd;hp=0e894e9f3cb1028644969c80170ac79172c60c19;hb=c3d401c2ce5137fd8c3e8f4bf3b71b21dc881ccb;hpb=a13b80a2b4450161adb817165fd5f7a95be72811

diff --git a/tools/gen-styles b/tools/gen-styles
index 0e894e9f..d158d8bf 100644
--- a/tools/gen-styles
+++ b/tools/gen-styles
@@ -140,8 +140,10 @@ warn sprintf( 's%1.3f, l%1.3f -> %s',
 
 my $baseTheme = "AppTheme.NoActionBar";
 
+use constant STEP_DEGREES => 15;
+
 # # hsb
-# for( my $hue = 0; $hue < 360; $hue += 15 ) {
+# for( my $hue = 0; $hue < 360; $hue += STEP_DEGREES ) {
 # 	printf "<style name=\"%s.%d\" parent=\"%s\">\n",
 # 		$baseTheme, $hue, $baseTheme;
 # 	printf "  <item name=\"colorPrimary\">#%s</item>\n",
@@ -165,7 +167,7 @@ sub outputThemes {
 	my $out = shift;
 	my $baseIndent = shift;
 	$out->print(hslStyleForHue($baseColorHue, undef, $baseIndent));
-	for( my $hue = 0; $hue < 360; $hue += 15 ) {
+	for( my $hue = 0; $hue < 360; $hue += STEP_DEGREES ) {
 		$out->print("\n");
 		$out->print(hslStyleForHue($hue, $baseTheme, $baseIndent));
 	}