diff --git a/helix-term/src/commands.rs b/helix-term/src/commands.rs
index 6c1075ac7..7ccb63f27 100644
--- a/helix-term/src/commands.rs
+++ b/helix-term/src/commands.rs
@@ -356,7 +356,7 @@ impl MappableCommand {
         extend_prev_char, "Extend to previous occurrence of char",
         repeat_last_motion, "Repeat last motion",
         replace, "Replace with new char",
-        switch_case, "Switch to aLTERNATE cASE",
+        switch_to_alternate_case, "Switch to aLTERNATE cASE",
         switch_to_uppercase, "Switch to UPPERCASE",
         switch_to_lowercase, "Switch to lowercase",
         switch_to_pascal_case, "Switch to PascalCase",
@@ -1803,7 +1803,7 @@ fn switch_to_uppercase(cx: &mut Context) {
     switch_case_impl(cx, |chars| to_uppercase(chars))
 }
 
-fn switch_case(cx: &mut Context) {
+fn switch_to_alternate_case(cx: &mut Context) {
     switch_case_impl(cx, |chars| to_alternate_case(chars))
 }
 
diff --git a/helix-term/src/keymap/default.rs b/helix-term/src/keymap/default.rs
index 250e3149a..1643ca185 100644
--- a/helix-term/src/keymap/default.rs
+++ b/helix-term/src/keymap/default.rs
@@ -19,8 +19,8 @@ pub fn default() -> HashMap<Mode, KeyTrie> {
         "R" => replace_with_yanked,
         "A-." =>  repeat_last_motion,
 
-        "~" => switch_case,
         "`" => { "Case"
+            "a" => switch_to_alternate_case,
             "l" => switch_to_lowercase,
             "u" => switch_to_uppercase,
             "p" => switch_to_pascal_case,