From d427b66a664c0e1ffc818dfa5b87b45b4857d2ae Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Mon, 13 Jan 1992 21:48:03 +0000 Subject: entered into RCS --- src/casefiddle.c | 3 +++ 1 file changed, 3 insertions(+) (limited to 'src/casefiddle.c') diff --git a/src/casefiddle.c b/src/casefiddle.c index d508deb5d60..87dd1c79825 100644 --- a/src/casefiddle.c +++ b/src/casefiddle.c @@ -261,7 +261,10 @@ syms_of_casefiddle () keys_of_casefiddle () { initial_define_key (control_x_map, Ctl('U'), "upcase-region"); + Fput (intern ("upcase-region"), Qdisabled, Qt); initial_define_key (control_x_map, Ctl('L'), "downcase-region"); + Fput (intern ("downcase-region"), Qdisabled, Qt); + initial_define_key (meta_map, 'u', "upcase-word"); initial_define_key (meta_map, 'l', "downcase-word"); initial_define_key (meta_map, 'c', "capitalize-word"); -- cgit v1.2.3