aboutsummaryrefslogtreecommitdiffstats
path: root/src/casefiddle.c
diff options
context:
space:
mode:
authorYuuki Harano2021-01-10 18:49:51 +0900
committerYuuki Harano2021-01-10 18:49:51 +0900
commitaac33a8074c41354ffdb1236a342da16dca4a1bc (patch)
tree3a99478549f66d3f93a282e29d2c302995a86a49 /src/casefiddle.c
parent78fd106653a9e4fa7c9c3c9788540e2e15552254 (diff)
parent690cf6b8d8b8827f046bc1e24b2e556afeff976c (diff)
downloademacs-aac33a8074c41354ffdb1236a342da16dca4a1bc.tar.gz
emacs-aac33a8074c41354ffdb1236a342da16dca4a1bc.zip
Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs into feature/pgtk
Diffstat (limited to 'src/casefiddle.c')
-rw-r--r--src/casefiddle.c13
1 files changed, 0 insertions, 13 deletions
diff --git a/src/casefiddle.c b/src/casefiddle.c
index a948bb3bc88..a7a25414909 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -682,16 +682,3 @@ Called with one argument METHOD which can be:
682 defsubr (&Sdowncase_word); 682 defsubr (&Sdowncase_word);
683 defsubr (&Scapitalize_word); 683 defsubr (&Scapitalize_word);
684} 684}
685
686void
687keys_of_casefiddle (void)
688{
689 initial_define_key (control_x_map, Ctl ('U'), "upcase-region");
690 Fput (intern ("upcase-region"), Qdisabled, Qt);
691 initial_define_key (control_x_map, Ctl ('L'), "downcase-region");
692 Fput (intern ("downcase-region"), Qdisabled, Qt);
693
694 initial_define_key (meta_map, 'u', "upcase-word");
695 initial_define_key (meta_map, 'l', "downcase-word");
696 initial_define_key (meta_map, 'c', "capitalize-word");
697}