rhi/yummy.cricket
1
0
Fork 0
Code Issues Releases Activity

put minor swatches behind major so the shadows work

Browse source
This commit is contained in:
Rhiannon Morris 2024-12-10 02:52:11 +01:00
parent 303fd65bab
commit 3eddfe6e6a
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
rainbow-quox/make-palette/make-palette.hs
View file

@ -76,8 +76,8 @@ makeOnly layer display index =
makeMinor :: Text -> Maybe Text -> Text -> Maybe Text -> Int -> Element
makeMinor layer1 display1 layer2 _display2 index =
itemGroup layer1 index
[makeRect layer1 RMaj,
makeRect layer2 RMin,
[makeRect layer2 RMin,
makeRect layer1 RMaj,
makeTextBg layer1,
makeName (fromMaybe layer1 display1) Two,
makeHex layer1 SFirst,
@ -86,8 +86,8 @@ makeMinor layer1 display1 layer2 _display2 index =
makeUse :: Text -> Maybe Text -> Text -> Int -> Element
makeUse layer1 display1 layer2 index =
itemGroup layer1 index
[makeRect layer1 RMaj,
use_ [makeAttribute "href" $ "#s-" <> layer2],
[use_ [makeAttribute "href" $ "#s-" <> layer2],
makeRect layer1 RMaj,
makeTextBg layer1,
makeName (fromMaybe layer1 display1) Two,
makeHex layer1 SFirst,