/[qemacs]/qemacs/qeconfig.h
ViewVC logotype

Diff of /qemacs/qeconfig.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.8 by chqrlie, Mon May 9 02:42:08 2005 UTC revision 1.9 by chqrlie, Mon May 9 03:19:36 2005 UTC
# Line 29  CmdDef basic_commands[] = { Line 29  CmdDef basic_commands[] = {
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)
# Line 41  CmdDef basic_commands[] = { Line 41  CmdDef basic_commands[] = {
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",
# Line 74  CmdDef basic_commands[] = { Line 75  CmdDef basic_commands[] = {
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",
# Line 87  CmdDef basic_commands[] = { Line 88  CmdDef basic_commands[] = {
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)
# Line 119  CmdDef basic_commands[] = { Line 120  CmdDef basic_commands[] = {
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    

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26