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

Diff of /qemacs/qeconfig.h

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

revision 1.9 by chqrlie, Mon May 9 03:19:36 2005 UTC revision 1.10 by chqrlie, Mon May 9 09:10:37 2005 UTC
# Line 2  Line 2 
2   * default qemacs configuration   * default qemacs configuration
3   */   */
4  CmdDef basic_commands[] = {  CmdDef basic_commands[] = {
5      CMD1( KEY_DEFAULT, KEY_NONE, "self-insert-command", do_char, ' ')      CMDV( KEY_DEFAULT, KEY_NONE, "self-insert-command", do_char, ' ', "*v")
6      CMD0( KEY_CTRL('o'), KEY_NONE, "open-line", do_open_line)      CMD_( KEY_CTRL('o'), KEY_NONE, "open-line", do_open_line, "*")
7      CMD1( KEY_CTRL('p'), KEY_UP, "previous-line", do_up_down, -1 )      CMD1( KEY_CTRL('p'), KEY_UP, "previous-line", do_up_down, -1 )
8      CMD1( KEY_CTRL('n'), KEY_DOWN, "next-line", do_up_down, 1 )      CMD1( KEY_CTRL('n'), KEY_DOWN, "next-line", do_up_down, 1 )
9      CMD1( KEY_CTRL('b'), KEY_LEFT, "backward-char", do_left_right, -1 )      CMD1( KEY_CTRL('b'), KEY_LEFT, "backward-char", do_left_right, -1 )
# Line 17  CmdDef basic_commands[] = { Line 17  CmdDef basic_commands[] = {
17      CMD0( KEY_HOME, KEY_CTRL('a'), "beginning-of-line", do_bol)      CMD0( KEY_HOME, KEY_CTRL('a'), "beginning-of-line", do_bol)
18      CMD0( KEY_END, KEY_CTRL('e'), "end-of-line", do_eol)      CMD0( KEY_END, KEY_CTRL('e'), "end-of-line", do_eol)
19      CMD0( KEY_INSERT, KEY_NONE, "overwrite-mode", do_insert)      CMD0( KEY_INSERT, KEY_NONE, "overwrite-mode", do_insert)
20        /* deletion commands are allowed in read only buffers,
21         * they will merely copy the data to the kill ring */
22      CMD0( KEY_CTRL('d'), KEY_DELETE, "delete-char", do_delete_char)      CMD0( KEY_CTRL('d'), KEY_DELETE, "delete-char", do_delete_char)
23      CMD0( 127, KEY_NONE, "backward-delete-char", do_backspace)      CMD0( 127, KEY_NONE, "backward-delete-char", do_backspace)
24      CMD1( KEY_META(KEY_DEL) , KEY_META(KEY_BS),      CMD1( KEY_META(KEY_DEL) , KEY_META(KEY_BS),
# Line 33  CmdDef basic_commands[] = { Line 35  CmdDef basic_commands[] = {
35            "s{Command: }[command]|command|i")            "s{Command: }[command]|command|i")
36      CMD0( KEY_CTRL('u'), KEY_NONE, "universal-argument",      CMD0( KEY_CTRL('u'), KEY_NONE, "universal-argument",
37            do_universal_argument)            do_universal_argument)
38      CMD0( KEY_CTRL('y'), KEY_NONE, "yank", do_yank)      CMD_( KEY_CTRL('y'), KEY_NONE, "yank", do_yank, "*")
39      CMD0( KEY_META('y'), KEY_NONE, "yank-pop", do_yank_pop)      CMD_( KEY_META('y'), KEY_NONE, "yank-pop", do_yank_pop, "*")
40        /* do_tab will not change read only buffer */
41      CMD0( KEY_CTRL('i'), KEY_NONE, "tabulate", do_tab)      CMD0( KEY_CTRL('i'), KEY_NONE, "tabulate", do_tab)
42      CMD0( KEY_CTRL('q'), KEY_NONE, "quoted-insert", do_quote)      CMD_( KEY_CTRL('q'), KEY_NONE, "quoted-insert", do_quote, "*")
43      CMD1( KEY_CTRLX(KEY_CTRL('s')), KEY_NONE, "save-buffer", do_save, 0 )      CMD1( KEY_CTRLX(KEY_CTRL('s')), KEY_NONE, "save-buffer", do_save, 0 )
44      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 )
45      CMD0( KEY_CTRLX(KEY_CTRL('c')), KEY_NONE, "suspend-emacs", do_quit )      CMD0( KEY_CTRLX(KEY_CTRL('c')), KEY_NONE, "suspend-emacs", do_quit )
# Line 50  CmdDef basic_commands[] = { Line 53  CmdDef basic_commands[] = {
53      CMD_( KEY_CTRLX('k'), KEY_NONE, "kill-buffer", do_kill_buffer,      CMD_( KEY_CTRLX('k'), KEY_NONE, "kill-buffer", do_kill_buffer,
54            "s{Kill buffer: }[buffer]|buffer|")            "s{Kill buffer: }[buffer]|buffer|")
55      CMD_( KEY_CTRLX('i'), KEY_NONE, "insert-file", do_insert_file,      CMD_( KEY_CTRLX('i'), KEY_NONE, "insert-file", do_insert_file,
56            "s{Insert file: }[file]|file|")            "*s{Insert file: }[file]|file|")
57      CMD0( KEY_CTRL('g'), KEY_NONE, "abort", do_break)      CMD0( KEY_CTRL('g'), KEY_CTRLX(KEY_CTRL('g')), "abort", do_break)
58      CMD0( KEY_NONE, KEY_NONE, "doctor", do_doctor)      CMD0( KEY_NONE, KEY_NONE, "doctor", do_doctor)
59      CMDV( KEY_NONE, KEY_NONE, "search-forward", do_search_string, 1,      CMDV( KEY_NONE, KEY_NONE, "search-forward", do_search_string, 1,
60            "s{Search forward: }|search|v")            "s{Search forward: }|search|v")
# Line 60  CmdDef basic_commands[] = { Line 63  CmdDef basic_commands[] = {
63      CMD1( KEY_CTRL('s'), KEY_NONE, "isearch-forward", do_isearch, 1 )      CMD1( KEY_CTRL('s'), KEY_NONE, "isearch-forward", do_isearch, 1 )
64      CMD1( KEY_CTRL('r'), KEY_NONE, "isearch-backward", do_isearch, -1 )      CMD1( KEY_CTRL('r'), KEY_NONE, "isearch-backward", do_isearch, -1 )
65      CMD_( KEY_META('%'), KEY_NONE, "query-replace", do_query_replace,      CMD_( KEY_META('%'), KEY_NONE, "query-replace", do_query_replace,
66            "s{Query replace: }|search|s{With: }|replace|")            "*s{Query replace: }|search|s{With: }|replace|")
67      CMD_( KEY_META('r'), KEY_NONE, "replace-string", do_replace_string,      CMD_( KEY_META('r'), KEY_NONE, "replace-string", do_replace_string,
68            "s{Replace String: }|search|s{With: }|replace|")            "*s{Replace String: }|search|s{With: }|replace|")
69      CMD0( KEY_CTRLX('u'), KEY_CTRL('_'), "undo", do_undo)      CMD0( KEY_CTRLX('u'), KEY_CTRL('_'), "undo", do_undo)
70      CMD0( KEY_RET, KEY_NONE, "newline", do_return)      CMD_( KEY_RET, KEY_NONE, "newline", do_return, "*")
71      CMD0( KEY_CTRL('l'), KEY_NONE, "refresh", do_refresh_complete)      CMD0( KEY_CTRL('l'), KEY_NONE, "refresh", do_refresh_complete)
72      /* CG: should take a string if no numeric argument given */      /* CG: should take a string if no numeric argument given */
73      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: }")
74      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: }")
75      CMD0( KEY_CTRLX(KEY_CTRL('q')), KEY_NONE, "vc-toggle-read-only",      CMD0( KEY_CTRLX(KEY_CTRL('q')), KEY_NONE, "vc-toggle-read-only",
76            do_toggle_read_only)            do_toggle_read_only)
77      CMD0( KEY_META('q'), KEY_NONE, "fill-paragraph", do_fill_paragraph)      CMD0( KEY_META('~'), KEY_NONE, "not-modified", do_not_modified)
78        CMD_( KEY_META('q'), KEY_NONE, "fill-paragraph", do_fill_paragraph, "*")
79      CMD0( KEY_META('{'), KEY_NONE, "backward-paragraph", do_backward_paragraph)      CMD0( KEY_META('{'), KEY_NONE, "backward-paragraph", do_backward_paragraph)
80      CMD0( KEY_META('}'), KEY_NONE, "forward-paragraph", do_forward_paragraph)      CMD0( KEY_META('}'), KEY_NONE, "forward-paragraph", do_forward_paragraph)
81      CMD0( KEY_CTRLX(KEY_CTRL('x')), KEY_NONE, "exchange-point-and-mark",      CMD0( KEY_CTRLX(KEY_CTRL('x')), KEY_NONE, "exchange-point-and-mark",
82            do_exchange_point_and_mark)            do_exchange_point_and_mark)
83      CMD1( KEY_META('l'), KEY_NONE, "downcase-word", do_changecase_word, 0)      CMDV( KEY_META('l'), KEY_NONE, "downcase-word", do_changecase_word, 0, "*v")
84      CMD1( KEY_META('u'), KEY_NONE, "upcase-word", do_changecase_word, 1)      CMDV( KEY_META('u'), KEY_NONE, "upcase-word", do_changecase_word, 1, "*v")
85      CMD1( KEY_CTRLX(KEY_CTRL('l')), KEY_NONE, "downcase-region",      CMDV( KEY_CTRLX(KEY_CTRL('l')), KEY_NONE, "downcase-region",
86            do_changecase_region, 0)            do_changecase_region, 0, "*v")
87      CMD1( KEY_CTRLX(KEY_CTRL('u')), KEY_NONE, "upcase-region",      CMDV( KEY_CTRLX(KEY_CTRL('u')), KEY_NONE, "upcase-region",
88            do_changecase_region, 1)            do_changecase_region, 1, "*v")
89    
90      /* keyboard macros */      /* keyboard macros */
91      CMD0( KEY_CTRLX('('), KEY_NONE, "start-kbd-macro", do_start_macro)      CMD0( KEY_CTRLX('('), KEY_NONE, "start-kbd-macro", do_start_macro)
92      CMD0( KEY_CTRLX(')'), KEY_NONE, "end-kbd-macro", do_end_macro)      CMD0( KEY_CTRLX(')'), KEY_NONE, "end-kbd-macro", do_end_macro)
93      CMD0( KEY_CTRLX('e'), KEY_NONE, "call-last-kbd-macro", do_call_macro)      CMD0( KEY_CTRLX('e'), KEY_CTRL('\\'), "call-last-kbd-macro", do_call_macro)
94      CMD_( KEY_NONE, KEY_NONE, "define-kbd-macro", do_define_kbd_macro,      CMD_( KEY_NONE, KEY_NONE, "define-kbd-macro", do_define_kbd_macro,
95            "s{Macro name: }[command]s{Macro keys: }s{Bind to key: }[key]")            "s{Macro name: }[command]s{Macro keys: }s{Bind to key: }[key]")
96      CMD_( KEY_NONE, KEY_NONE, "global-set-key", do_global_set_key,      CMD_( KEY_NONE, KEY_NONE, "global-set-key", do_global_set_key,
# Line 96  CmdDef basic_commands[] = { Line 100  CmdDef basic_commands[] = {
100      CMD0( KEY_CTRLX('o'), KEY_NONE, "other-window", do_other_window)      CMD0( KEY_CTRLX('o'), KEY_NONE, "other-window", do_other_window)
101      CMD0( KEY_CTRLX('n'), KEY_NONE, "next-window", do_other_window)      CMD0( KEY_CTRLX('n'), KEY_NONE, "next-window", do_other_window)
102      CMD0( KEY_CTRLX('p'), KEY_NONE, "previous-window", do_previous_window)      CMD0( KEY_CTRLX('p'), KEY_NONE, "previous-window", do_previous_window)
103    #ifndef CONFIG_TINY
104      CMD1( KEY_CTRL('x'), KEY_UP, "find-window-up", do_find_window,      CMD1( KEY_CTRL('x'), KEY_UP, "find-window-up", do_find_window,
105            KEY_UP)            KEY_UP)
106      CMD1( KEY_CTRL('x'), KEY_DOWN, "find-window-down", do_find_window,      CMD1( KEY_CTRL('x'), KEY_DOWN, "find-window-down", do_find_window,
# Line 104  CmdDef basic_commands[] = { Line 109  CmdDef basic_commands[] = {
109            KEY_LEFT)            KEY_LEFT)
110      CMD1( KEY_CTRL('x'), KEY_RIGHT, "find-window-right", do_find_window,      CMD1( KEY_CTRL('x'), KEY_RIGHT, "find-window-right", do_find_window,
111            KEY_RIGHT)            KEY_RIGHT)
112    #endif
113      CMD1( KEY_CTRLX('0'), KEY_NONE, "delete-window", do_delete_window, 0)      CMD1( KEY_CTRLX('0'), KEY_NONE, "delete-window", do_delete_window, 0)
114      CMD0( KEY_CTRLX('1'), KEY_NONE, "delete-other-windows",      CMD0( KEY_CTRLX('1'), KEY_NONE, "delete-other-windows",
115            do_delete_other_windows)            do_delete_other_windows)
# Line 124  CmdDef basic_commands[] = { Line 130  CmdDef basic_commands[] = {
130            "s{Charset: }[charset]")            "s{Charset: }[charset]")
131      CMD_( KEY_NONE, KEY_NONE, "convert-buffer-file-coding-system",      CMD_( KEY_NONE, KEY_NONE, "convert-buffer-file-coding-system",
132            do_convert_buffer_file_coding_system,            do_convert_buffer_file_coding_system,
133            "s{Charset: }[charset]")            "*s{Charset: }[charset]")
134      CMD0( KEY_CTRLXRET('b'), KEY_NONE, "toggle-bidir", do_toggle_bidir)      CMD0( KEY_CTRLXRET('b'), KEY_NONE, "toggle-bidir", do_toggle_bidir)
135      CMD_( KEY_CTRLXRET(KEY_CTRL('\\')), KEY_NONE, "set-input-method",      CMD_( KEY_CTRLXRET(KEY_CTRL('\\')), KEY_NONE, "set-input-method",
136            do_set_input_method,            do_set_input_method,
137            "s{Input method: }[input]")            "s{Input method: }[input]")
138      CMD0( KEY_CTRL('\\'), KEY_NONE,      CMD0( KEY_CTRLX(KEY_CTRL('\\')), KEY_NONE,
139            "switch-input-method", do_switch_input_method)            "switch-input-method", do_switch_input_method)
140    
141      /* styles & display */      /* styles & display */
# Line 147  CmdDef basic_commands[] = { Line 153  CmdDef basic_commands[] = {
153      CMD0( KEY_NONE, KEY_NONE, "toggle-mode-line", do_toggle_mode_line)      CMD0( KEY_NONE, KEY_NONE, "toggle-mode-line", do_toggle_mode_line)
154    
155      /* other stuff */      /* other stuff */
156        CMD_( KEY_NONE, KEY_NONE, "load-file-from-path", do_load_file_from_path,
157              "s{Load file from path: }|file|")
158      CMD_( KEY_NONE, KEY_NONE, "parse-config-file", parse_config,      CMD_( KEY_NONE, KEY_NONE, "parse-config-file", parse_config,
159            "s{Configuration file: }[file]|file|")            "s{Configuration file: }[file]|file|")
160      CMD_( KEY_NONE, KEY_NONE, "load-qerc", do_load_qerc,      CMD_( KEY_NONE, KEY_NONE, "load-qerc", do_load_qerc,
# Line 168  CmdDef basic_commands[] = { Line 176  CmdDef basic_commands[] = {
176            "s{Change default directory: }[file]|file|")            "s{Change default directory: }[file]|file|")
177      CMD_( KEY_NONE, KEY_NONE, "set-mode", do_cmd_set_mode,      CMD_( KEY_NONE, KEY_NONE, "set-mode", do_cmd_set_mode,
178            "s{Set mode: }[mode]")            "s{Set mode: }[mode]")
179        CMD0( KEY_CTRLX('h'), KEY_NONE, "mark-whole-buffer", do_mark_whole_buffer)
180        CMD0( KEY_CTRLX('l'), KEY_NONE, "count-lines", do_count_lines)
181        CMD0( KEY_CTRLX('='), KEY_NONE, "what-cursor-position",
182              do_what_cursor_position)
183            
184      /* tab & indent */      /* tab & indent */
185      CMD_( KEY_NONE, KEY_NONE, "set-tab-width", do_set_tab_width,      CMD_( KEY_NONE, KEY_NONE, "set-tab-width", do_set_tab_width,

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

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