diff options
Diffstat (limited to 'src/casefiddle.c')
| -rw-r--r-- | src/casefiddle.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/casefiddle.c b/src/casefiddle.c index 50ad4eeda74..80c05aabc7d 100644 --- a/src/casefiddle.c +++ b/src/casefiddle.c | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | /* GNU Emacs case conversion functions. | 1 | /* GNU Emacs case conversion functions. |
| 2 | 2 | ||
| 3 | Copyright (C) 1985, 1994, 1997-1999, 2001-2011 Free Software Foundation, Inc. | 3 | Copyright (C) 1985, 1994, 1997-1999, 2001-2012 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | This file is part of GNU Emacs. | 5 | This file is part of GNU Emacs. |
| 6 | 6 | ||
| @@ -223,7 +223,7 @@ casify_region (enum case_action flag, Lisp_Object b, Lisp_Object e) | |||
| 223 | record_change (start, end - start); | 223 | record_change (start, end - start); |
| 224 | start_byte = CHAR_TO_BYTE (start); | 224 | start_byte = CHAR_TO_BYTE (start); |
| 225 | 225 | ||
| 226 | SETUP_BUFFER_SYNTAX_TABLE(); /* For syntax_prefix_flag_p. */ | 226 | SETUP_BUFFER_SYNTAX_TABLE (); /* For syntax_prefix_flag_p. */ |
| 227 | 227 | ||
| 228 | while (start < end) | 228 | while (start < end) |
| 229 | { | 229 | { |
| @@ -434,9 +434,9 @@ syms_of_casefiddle (void) | |||
| 434 | void | 434 | void |
| 435 | keys_of_casefiddle (void) | 435 | keys_of_casefiddle (void) |
| 436 | { | 436 | { |
| 437 | initial_define_key (control_x_map, Ctl('U'), "upcase-region"); | 437 | initial_define_key (control_x_map, Ctl ('U'), "upcase-region"); |
| 438 | Fput (intern ("upcase-region"), Qdisabled, Qt); | 438 | Fput (intern ("upcase-region"), Qdisabled, Qt); |
| 439 | initial_define_key (control_x_map, Ctl('L'), "downcase-region"); | 439 | initial_define_key (control_x_map, Ctl ('L'), "downcase-region"); |
| 440 | Fput (intern ("downcase-region"), Qdisabled, Qt); | 440 | Fput (intern ("downcase-region"), Qdisabled, Qt); |
| 441 | 441 | ||
| 442 | initial_define_key (meta_map, 'u', "upcase-word"); | 442 | initial_define_key (meta_map, 'u', "upcase-word"); |