Skip to content

Commit 245c691

Browse files
committed
Fix letter helper naming in Key
1 parent 8c71011 commit 245c691

File tree

1 file changed

+27
-27
lines changed

1 file changed

+27
-27
lines changed

src/UI/KeyboardShortcut/Key.elm

Lines changed: 27 additions & 27 deletions
Original file line numberDiff line numberDiff line change
@@ -523,7 +523,7 @@ fromString str =
523523
view : OperatingSystem -> Key -> String
524524
view os key =
525525
let
526-
letter l casing =
526+
letter_ l casing =
527527
case casing of
528528
Lower ->
529529
String.toLower l
@@ -533,82 +533,82 @@ view os key =
533533
in
534534
case key of
535535
A casing ->
536-
letter "a" casing
536+
letter_ "a" casing
537537

538538
B casing ->
539-
letter "b" casing
539+
letter_ "b" casing
540540

541541
C casing ->
542-
letter "c" casing
542+
letter_ "c" casing
543543

544544
D casing ->
545-
letter "d" casing
545+
letter_ "d" casing
546546

547547
E casing ->
548-
letter "e" casing
548+
letter_ "e" casing
549549

550550
F casing ->
551-
letter "f" casing
551+
letter_ "f" casing
552552

553553
G casing ->
554-
letter "g" casing
554+
letter_ "g" casing
555555

556556
H casing ->
557-
letter "h" casing
557+
letter_ "h" casing
558558

559559
I casing ->
560-
letter "i" casing
560+
letter_ "i" casing
561561

562562
J casing ->
563-
letter "j" casing
563+
letter_ "j" casing
564564

565565
K casing ->
566-
letter "k" casing
566+
letter_ "k" casing
567567

568568
L casing ->
569-
letter "l" casing
569+
letter_ "l" casing
570570

571571
M casing ->
572-
letter "m" casing
572+
letter_ "m" casing
573573

574574
N casing ->
575-
letter "n" casing
575+
letter_ "n" casing
576576

577577
O casing ->
578-
letter "o" casing
578+
letter_ "o" casing
579579

580580
P casing ->
581-
letter "p" casing
581+
letter_ "p" casing
582582

583583
Q casing ->
584-
letter "q" casing
584+
letter_ "q" casing
585585

586586
R casing ->
587-
letter "r" casing
587+
letter_ "r" casing
588588

589589
S casing ->
590-
letter "s" casing
590+
letter_ "s" casing
591591

592592
T casing ->
593-
letter "t" casing
593+
letter_ "t" casing
594594

595595
U casing ->
596-
letter "u" casing
596+
letter_ "u" casing
597597

598598
V casing ->
599-
letter "v" casing
599+
letter_ "v" casing
600600

601601
W casing ->
602-
letter "w" casing
602+
letter_ "w" casing
603603

604604
X casing ->
605-
letter "x" casing
605+
letter_ "x" casing
606606

607607
Y casing ->
608-
letter "y" casing
608+
letter_ "y" casing
609609

610610
Z casing ->
611-
letter "z" casing
611+
letter_ "z" casing
612612

613613
Semicolon ->
614614
";"

0 commit comments

Comments
 (0)