29 |
CMD0( KEY_META('<'), KEY_CTRL_HOME, "beginning-of-buffer", do_bof ) |
CMD0( KEY_META('<'), KEY_CTRL_HOME, "beginning-of-buffer", do_bof ) |
30 |
CMD0( KEY_META('>'), KEY_CTRL_END, "end-of-buffer", do_eof ) |
CMD0( KEY_META('>'), KEY_CTRL_END, "end-of-buffer", do_eof ) |
31 |
CMD_( KEY_META('x'), KEY_NONE, "execute-extended-command", |
CMD_( KEY_META('x'), KEY_NONE, "execute-extended-command", |
32 |
do_execute_command, |
do_execute_command, |
33 |
"s{Command: }[command]|command|i" ) |
"s{Command: }[command]|command|i") |
34 |
CMD0( KEY_CTRL('u'), KEY_NONE, "universal-argument", |
CMD0( KEY_CTRL('u'), KEY_NONE, "universal-argument", |
35 |
do_universal_argument ) |
do_universal_argument) |
36 |
CMD0( KEY_CTRL('y'), KEY_NONE, "yank", do_yank) |
CMD0( KEY_CTRL('y'), KEY_NONE, "yank", do_yank) |
37 |
CMD0( KEY_META('y'), KEY_NONE, "yank-pop", do_yank_pop) |
CMD0( KEY_META('y'), KEY_NONE, "yank-pop", do_yank_pop) |
38 |
CMD0( KEY_CTRL('i'), KEY_NONE, "tabulate", do_tab) |
CMD0( KEY_CTRL('i'), KEY_NONE, "tabulate", do_tab) |
41 |
CMD1( KEY_CTRLX(KEY_CTRL('w')), KEY_NONE, "write-file", do_save, 1 ) |
CMD1( KEY_CTRLX(KEY_CTRL('w')), KEY_NONE, "write-file", do_save, 1 ) |
42 |
CMD0( KEY_CTRLX(KEY_CTRL('c')), KEY_NONE, "suspend-emacs", do_quit ) |
CMD0( KEY_CTRLX(KEY_CTRL('c')), KEY_NONE, "suspend-emacs", do_quit ) |
43 |
CMD_( KEY_CTRLX(KEY_CTRL('f')), KEY_NONE, "find-file", do_load, |
CMD_( KEY_CTRLX(KEY_CTRL('f')), KEY_NONE, "find-file", do_load, |
44 |
"s{Find file: }[file]|file|") |
"s{Find file: }[file]|file|") |
45 |
CMD_( KEY_CTRLX(KEY_CTRL('v')), KEY_NONE, "find-alternate-file", |
CMD_( KEY_CTRLX(KEY_CTRL('v')), KEY_NONE, "find-alternate-file", |
46 |
do_find_alternate_file, |
do_find_alternate_file, |
47 |
"s{Find alternate file: }[file]|file|") |
"s{Find alternate file: }[file]|file|") |
48 |
CMD_( KEY_CTRLX('b'), KEY_NONE, "switch-to-buffer", do_switch_to_buffer, |
CMD_( KEY_CTRLX('b'), KEY_NONE, "switch-to-buffer", do_switch_to_buffer, |
49 |
"s{Switch to buffer: }[buffer]|buffer|") |
"s{Switch to buffer: }[buffer]|buffer|") |
50 |
CMD_( KEY_CTRLX('k'), KEY_NONE, "kill-buffer", do_kill_buffer, |
CMD_( KEY_CTRLX('k'), KEY_NONE, "kill-buffer", do_kill_buffer, |
51 |
"s{Kill buffer: }[buffer]|buffer|") |
"s{Kill buffer: }[buffer]|buffer|") |
52 |
CMD_( KEY_CTRLX('i'), KEY_NONE, "insert-file", do_insert_file, |
CMD_( KEY_CTRLX('i'), KEY_NONE, "insert-file", do_insert_file, |
53 |
"s{Insert file: }[file]|file|") |
"s{Insert file: }[file]|file|") |
54 |
CMD0( KEY_CTRL('g'), KEY_NONE, "abort", do_break) |
CMD0( KEY_CTRL('g'), KEY_NONE, "abort", do_break) |
55 |
CMD0( KEY_NONE, KEY_NONE, "doctor", do_doctor) |
CMD0( KEY_NONE, KEY_NONE, "doctor", do_doctor) |
56 |
CMDV( KEY_NONE, KEY_NONE, "search-forward", do_search_string, 1, |
CMDV( KEY_NONE, KEY_NONE, "search-forward", do_search_string, 1, |
57 |
"s{Search forward: }|search|v") |
"s{Search forward: }|search|v") |
58 |
CMDV( KEY_NONE, KEY_NONE, "search-backward", do_search_string, -1, |
CMDV( KEY_NONE, KEY_NONE, "search-backward", do_search_string, -1, |
59 |
"s{Search backward: }|search|v") |
"s{Search backward: }|search|v") |
60 |
CMD1( KEY_CTRL('s'), KEY_NONE, "isearch-forward", do_isearch, 1 ) |
CMD1( KEY_CTRL('s'), KEY_NONE, "isearch-forward", do_isearch, 1 ) |
61 |
CMD1( KEY_CTRL('r'), KEY_NONE, "isearch-backward", do_isearch, -1 ) |
CMD1( KEY_CTRL('r'), KEY_NONE, "isearch-backward", do_isearch, -1 ) |
62 |
CMD_( KEY_META('%'), KEY_NONE, "query-replace", do_query_replace, |
CMD_( KEY_META('%'), KEY_NONE, "query-replace", do_query_replace, |
63 |
"s{Query replace: }|search|s{With: }|replace|") |
"s{Query replace: }|search|s{With: }|replace|") |
64 |
CMD_( KEY_META('r'), KEY_NONE, "replace-string", do_replace_string, |
CMD_( KEY_META('r'), KEY_NONE, "replace-string", do_replace_string, |
65 |
"s{Replace String: }|search|s{With: }|replace|") |
"s{Replace String: }|search|s{With: }|replace|") |
66 |
CMD0( KEY_CTRLX('u'), KEY_CTRL('_'), "undo", do_undo) |
CMD0( KEY_CTRLX('u'), KEY_CTRL('_'), "undo", do_undo) |
67 |
CMD0( KEY_RET, KEY_NONE, "newline", do_return) |
CMD0( KEY_RET, KEY_NONE, "newline", do_return) |
68 |
CMD0( KEY_CTRL('l'), KEY_NONE, "refresh", do_refresh_complete) |
CMD0( KEY_CTRL('l'), KEY_NONE, "refresh", do_refresh_complete) |
69 |
|
/* CG: should take a string if no numeric argument given */ |
70 |
CMD_( KEY_META('g'), KEY_NONE, "goto-line", do_goto_line, "i{Goto line: }") |
CMD_( KEY_META('g'), KEY_NONE, "goto-line", do_goto_line, "i{Goto line: }") |
71 |
CMD_( KEY_NONE, KEY_NONE, "goto-char", do_goto_char, "i{Goto char: }") |
CMD_( KEY_NONE, KEY_NONE, "goto-char", do_goto_char, "i{Goto char: }") |
72 |
CMD0( KEY_CTRLX(KEY_CTRL('q')), KEY_NONE, "vc-toggle-read-only", |
CMD0( KEY_CTRLX(KEY_CTRL('q')), KEY_NONE, "vc-toggle-read-only", |
75 |
CMD0( KEY_META('{'), KEY_NONE, "backward-paragraph", do_backward_paragraph) |
CMD0( KEY_META('{'), KEY_NONE, "backward-paragraph", do_backward_paragraph) |
76 |
CMD0( KEY_META('}'), KEY_NONE, "forward-paragraph", do_forward_paragraph) |
CMD0( KEY_META('}'), KEY_NONE, "forward-paragraph", do_forward_paragraph) |
77 |
CMD0( KEY_CTRLX(KEY_CTRL('x')), KEY_NONE, "exchange-point-and-mark", |
CMD0( KEY_CTRLX(KEY_CTRL('x')), KEY_NONE, "exchange-point-and-mark", |
78 |
do_exchange_point_and_mark) |
do_exchange_point_and_mark) |
79 |
CMD1( KEY_META('l'), KEY_NONE, "downcase-word", do_changecase_word, 0) |
CMD1( KEY_META('l'), KEY_NONE, "downcase-word", do_changecase_word, 0) |
80 |
CMD1( KEY_META('u'), KEY_NONE, "upcase-word", do_changecase_word, 1) |
CMD1( KEY_META('u'), KEY_NONE, "upcase-word", do_changecase_word, 1) |
81 |
CMD1( KEY_CTRLX(KEY_CTRL('l')), KEY_NONE, "downcase-region", |
CMD1( KEY_CTRLX(KEY_CTRL('l')), KEY_NONE, "downcase-region", |
88 |
CMD0( KEY_CTRLX(')'), KEY_NONE, "end-kbd-macro", do_end_macro) |
CMD0( KEY_CTRLX(')'), KEY_NONE, "end-kbd-macro", do_end_macro) |
89 |
CMD0( KEY_CTRLX('e'), KEY_NONE, "call-last-kbd-macro", do_call_macro) |
CMD0( KEY_CTRLX('e'), KEY_NONE, "call-last-kbd-macro", do_call_macro) |
90 |
CMD_( KEY_NONE, KEY_NONE, "define-kbd-macro", do_define_kbd_macro, |
CMD_( KEY_NONE, KEY_NONE, "define-kbd-macro", do_define_kbd_macro, |
91 |
"s{Macro name: }[command]s{Macro keys: }s{Bind to key: }[key]") |
"s{Macro name: }[command]s{Macro keys: }s{Bind to key: }[key]") |
92 |
CMD_( KEY_NONE, KEY_NONE, "global-set-key", do_global_set_key, |
CMD_( KEY_NONE, KEY_NONE, "global-set-key", do_global_set_key, |
93 |
"s{Set key globally: }[key]s{command: }[command]|command|") |
"s{Set key globally: }[key]s{command: }[command]|command|") |
94 |
|
|
95 |
/* window handling */ |
/* window handling */ |
96 |
CMD0( KEY_CTRLX('o'), KEY_NONE, "other-window", do_other_window) |
CMD0( KEY_CTRLX('o'), KEY_NONE, "other-window", do_other_window) |
97 |
CMD0( KEY_CTRLX('n'), KEY_NONE, "next-window", do_other_window) |
CMD0( KEY_CTRLX('n'), KEY_NONE, "next-window", do_other_window) |
98 |
CMD0( KEY_CTRLX('p'), KEY_NONE, "previous-window", do_previous_window) |
CMD0( KEY_CTRLX('p'), KEY_NONE, "previous-window", do_previous_window) |
99 |
CMD1( KEY_CTRL('x'), KEY_UP, "find-window-up", do_find_window, |
CMD1( KEY_CTRL('x'), KEY_UP, "find-window-up", do_find_window, |
100 |
KEY_UP) |
KEY_UP) |
101 |
CMD1( KEY_CTRL('x'), KEY_DOWN, "find-window-down", do_find_window, |
CMD1( KEY_CTRL('x'), KEY_DOWN, "find-window-down", do_find_window, |
102 |
KEY_DOWN) |
KEY_DOWN) |
103 |
CMD1( KEY_CTRL('x'), KEY_LEFT, "find-window-left", do_find_window, |
CMD1( KEY_CTRL('x'), KEY_LEFT, "find-window-left", do_find_window, |
104 |
KEY_LEFT) |
KEY_LEFT) |
105 |
CMD1( KEY_CTRL('x'), KEY_RIGHT, "find-window-right", do_find_window, |
CMD1( KEY_CTRL('x'), KEY_RIGHT, "find-window-right", do_find_window, |
106 |
KEY_RIGHT) |
KEY_RIGHT) |
107 |
CMD1( KEY_CTRLX('0'), KEY_NONE, "delete-window", do_delete_window, 0) |
CMD1( KEY_CTRLX('0'), KEY_NONE, "delete-window", do_delete_window, 0) |
108 |
CMD0( KEY_CTRLX('1'), KEY_NONE, "delete-other-windows", |
CMD0( KEY_CTRLX('1'), KEY_NONE, "delete-other-windows", |
109 |
do_delete_other_windows) |
do_delete_other_windows) |
110 |
CMD1( KEY_CTRLX('2'), KEY_NONE, "split-window-vertically", |
CMD1( KEY_CTRLX('2'), KEY_NONE, "split-window-vertically", |
111 |
do_split_window, 0) |
do_split_window, 0) |
112 |
CMD1( KEY_CTRLX('3'), KEY_NONE, "split-window-horizontally", |
CMD1( KEY_CTRLX('3'), KEY_NONE, "split-window-horizontally", |
113 |
do_split_window, 1) |
do_split_window, 1) |
114 |
|
|
115 |
/* help */ |
/* help */ |
116 |
CMD0( KEY_CTRLH(KEY_CTRL('h')), KEY_F1, "help-for-help", do_help_for_help) |
CMD0( KEY_CTRLH(KEY_CTRL('h')), KEY_F1, "help-for-help", do_help_for_help) |
120 |
|
|
121 |
/* international */ |
/* international */ |
122 |
CMD_( KEY_CTRLXRET('f'), KEY_NONE, "set-buffer-file-coding-system", |
CMD_( KEY_CTRLXRET('f'), KEY_NONE, "set-buffer-file-coding-system", |
123 |
do_set_buffer_file_coding_system, |
do_set_buffer_file_coding_system, |
124 |
"s{Charset: }[charset]") |
"s{Charset: }[charset]") |
125 |
CMD_( KEY_NONE, KEY_NONE, "convert-buffer-file-coding-system", |
CMD_( KEY_NONE, KEY_NONE, "convert-buffer-file-coding-system", |
126 |
do_convert_buffer_file_coding_system, |
do_convert_buffer_file_coding_system, |
127 |
"s{Charset: }[charset]") |
"s{Charset: }[charset]") |
128 |
CMD0( KEY_CTRLXRET('b'), KEY_NONE, "toggle-bidir", do_toggle_bidir) |
CMD0( KEY_CTRLXRET('b'), KEY_NONE, "toggle-bidir", do_toggle_bidir) |
129 |
CMD_( KEY_CTRLXRET(KEY_CTRL('\\')), KEY_NONE, "set-input-method", |
CMD_( KEY_CTRLXRET(KEY_CTRL('\\')), KEY_NONE, "set-input-method", |
130 |
do_set_input_method, |
do_set_input_method, |
131 |
"s{Input method: }[input]") |
"s{Input method: }[input]") |
132 |
CMD0( KEY_CTRL('\\'), KEY_NONE, |
CMD0( KEY_CTRL('\\'), KEY_NONE, |
133 |
"switch-input-method", do_switch_input_method) |
"switch-input-method", do_switch_input_method) |
134 |
|
|
135 |
/* styles & display */ |
/* styles & display */ |
136 |
CMD_( KEY_NONE, KEY_NONE, "define-color", do_define_color, |
CMD_( KEY_NONE, KEY_NONE, "define-color", do_define_color, |
137 |
"s{Color name: }[color]|color|s{Color value: }[color]|color|") |
"s{Color name: }[color]|color|s{Color value: }[color]|color|") |
138 |
CMD_( KEY_NONE, KEY_NONE, "set-style", do_set_style, |
CMD_( KEY_NONE, KEY_NONE, "set-style", do_set_style, |
139 |
"s{Style: }[style]|style|s{CSS Property Name: }" |
"s{Style: }[style]|style|s{CSS Property Name: }" |
140 |
"s{CSS Property Value: }") |
"s{CSS Property Value: }") |
141 |
CMD_( KEY_NONE, KEY_NONE, "set-display-size", do_set_display_size, |
CMD_( KEY_NONE, KEY_NONE, "set-display-size", do_set_display_size, |
142 |
"i{Width: }i{Height: }") |
"i{Width: }i{Height: }") |
143 |
CMD_( KEY_NONE, KEY_NONE, "set-system-font", do_set_system_font, |
CMD_( KEY_NONE, KEY_NONE, "set-system-font", do_set_system_font, |
144 |
"s{Font family: }s{System fonts: }") |
"s{Font family: }s{System fonts: }") |
145 |
CMD0( KEY_CTRLX('f'), KEY_NONE, "toggle-full-screen", |
CMD0( KEY_CTRLX('f'), KEY_NONE, "toggle-full-screen", |
146 |
do_toggle_full_screen) |
do_toggle_full_screen) |
147 |
CMD0( KEY_NONE, KEY_NONE, "toggle-mode-line", do_toggle_mode_line) |
CMD0( KEY_NONE, KEY_NONE, "toggle-mode-line", do_toggle_mode_line) |
148 |
|
|
149 |
/* other stuff */ |
/* other stuff */ |
150 |
CMD_( KEY_NONE, KEY_NONE, "parse-config-file", parse_config, |
CMD_( KEY_NONE, KEY_NONE, "parse-config-file", parse_config, |
151 |
"s{Configuration file: }[file]|file|") |
"s{Configuration file: }[file]|file|") |
152 |
CMD_( KEY_NONE, KEY_NONE, "load-qerc", do_load_qerc, |
CMD_( KEY_NONE, KEY_NONE, "load-qerc", do_load_qerc, |
153 |
"s{path: }[file]|file|") |
"s{path: }[file]|file|") |
154 |
CMD_( KEY_NONE, KEY_NONE, "set-visited-file-name", |
CMD_( KEY_NONE, KEY_NONE, "set-visited-file-name", |
155 |
do_set_visited_file_name, |
do_set_visited_file_name, |
156 |
"s{Set visited file name: }[file]|file|s{Rename file? }") |
"s{Set visited file name: }[file]|file|s{Rename file? }") |
157 |
|
|
158 |
/* non standard mappings */ |
/* non standard mappings */ |
159 |
CMD0( KEY_CTRLXRET('l'), KEY_NONE, "toggle-line-numbers", do_line_numbers) |
CMD0( KEY_CTRLXRET('l'), KEY_NONE, "toggle-line-numbers", |
160 |
CMD0( KEY_CTRLXRET('t'), KEY_NONE, "truncate-lines", do_line_truncate ) |
do_toggle_line_numbers) |
161 |
|
CMD0( KEY_CTRLXRET('t'), KEY_NONE, "toggle-truncate-lines", |
162 |
|
do_toggle_truncate_lines) |
163 |
CMD0( KEY_CTRLXRET('w'), KEY_NONE, "word-wrap", do_word_wrap) |
CMD0( KEY_CTRLXRET('w'), KEY_NONE, "word-wrap", do_word_wrap) |
164 |
CMD1( KEY_NONE, KEY_NONE, "toggle-control-h", do_toggle_control_h, 0) |
CMD1( KEY_NONE, KEY_NONE, "toggle-control-h", do_toggle_control_h, 0) |
165 |
CMD_( KEY_NONE, KEY_NONE, "set-emulation", do_set_emulation, |
CMD_( KEY_NONE, KEY_NONE, "set-emulation", do_set_emulation, |
166 |
"s{Emulation mode: }") |
"s{Emulation mode: }") |
167 |
CMD_( KEY_NONE, KEY_NONE, "cd", do_cd, |
CMD_( KEY_NONE, KEY_NONE, "cd", do_cd, |
168 |
"s{Change default directory: }[file]|file|") |
"s{Change default directory: }[file]|file|") |
169 |
CMD_( KEY_NONE, KEY_NONE, "set-mode", do_cmd_set_mode, |
CMD_( KEY_NONE, KEY_NONE, "set-mode", do_cmd_set_mode, |
170 |
"s{Set mode: }[mode]") |
"s{Set mode: }[mode]") |
171 |
|
|
172 |
/* tab & indent */ |
/* tab & indent */ |
173 |
CMD_( KEY_NONE, KEY_NONE, "set-tab-width", do_set_tab_width, |
CMD_( KEY_NONE, KEY_NONE, "set-tab-width", do_set_tab_width, |
174 |
"i{Tab width: }") |
"i{Tab width: }") |
175 |
CMD_( KEY_NONE, KEY_NONE, "set-indent-width", do_set_indent_width, |
CMD_( KEY_NONE, KEY_NONE, "set-indent-width", do_set_indent_width, |
176 |
"i{Indent width: }") |
"i{Indent width: }") |
177 |
CMD_( KEY_NONE, KEY_NONE, "set-indent-tabs-mode", do_set_indent_tabs_mode, |
CMD_( KEY_NONE, KEY_NONE, "set-indent-tabs-mode", do_set_indent_tabs_mode, |
178 |
"i{Indent tabs mode (0 or 1): }") |
"i{Indent tabs mode (0 or 1): }") |
179 |
CMD_DEF_END, |
CMD_DEF_END, |
180 |
}; |
}; |
181 |
|
|