FIX icon fonts
This commit is contained in:
parent
09909ac779
commit
770f1dc1dd
|
@ -432,7 +432,7 @@ btCmd fontify =
|
||||||
{ csAlias = btAlias
|
{ csAlias = btAlias
|
||||||
, csRunnable =
|
, csRunnable =
|
||||||
Run $
|
Run $
|
||||||
Bluetooth (fontify' "\x0f00af" "+", fontify' "\x0f00af" "-") colors
|
Bluetooth (fontify' "\x0f00b1" "+", fontify' "\x0f00af" "-") colors
|
||||||
}
|
}
|
||||||
where
|
where
|
||||||
fontify' i = fontify IconLarge i . T.append "BT"
|
fontify' i = fontify IconLarge i . T.append "BT"
|
||||||
|
@ -473,7 +473,7 @@ ckCmd :: Fontifier -> CmdSpec
|
||||||
ckCmd fontify =
|
ckCmd fontify =
|
||||||
CmdSpec
|
CmdSpec
|
||||||
{ csAlias = ckAlias
|
{ csAlias = ckAlias
|
||||||
, csRunnable = Run $ ClevoKeyboard $ fontify IconLarge "\x0f0313" "KB: "
|
, csRunnable = Run $ ClevoKeyboard $ fontify IconSmall "\xf11c" "KB: "
|
||||||
}
|
}
|
||||||
|
|
||||||
ssCmd :: Fontifier -> CmdSpec
|
ssCmd :: Fontifier -> CmdSpec
|
||||||
|
|
Loading…
Reference in New Issue