Mercurial > emacs
comparison src/keyboard.c @ 43496:d42084cd7d73
(command_loop_1): Use Fremap_command for command remapping;
now try command remapping for all symbols.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Sat, 23 Feb 2002 22:02:18 +0000 |
parents | 29dc2ac9c886 |
children | f92c4d87863a bedac2738d2c |
comparison
equal
deleted
inserted
replaced
43495:3c0d7fbc071a | 43496:d42084cd7d73 |
---|---|
1504 reset it before we execute the command. */ | 1504 reset it before we execute the command. */ |
1505 Vdeactivate_mark = Qnil; | 1505 Vdeactivate_mark = Qnil; |
1506 | 1506 |
1507 /* Remap command through active keymaps */ | 1507 /* Remap command through active keymaps */ |
1508 Vthis_original_command = cmd; | 1508 Vthis_original_command = cmd; |
1509 if (is_command_symbol (cmd)) | 1509 if (SYMBOLP (cmd)) |
1510 { | 1510 { |
1511 Lisp_Object cmd1; | 1511 Lisp_Object cmd1; |
1512 | 1512 if (cmd1 = Fremap_command (cmd), !NILP (cmd1)) |
1513 cmd1 = Fkey_binding (cmd, Qnil, Qt); | |
1514 if (!NILP (cmd1) && is_command_symbol (cmd1)) | |
1515 cmd = cmd1; | 1513 cmd = cmd1; |
1516 } | 1514 } |
1517 | 1515 |
1518 /* Execute the command. */ | 1516 /* Execute the command. */ |
1519 | 1517 |