]> git.decadent.org.uk Git - ion3.git/blob - etc/cfg_query.lua
[svn-inject] Installing original source of ion3
[ion3.git] / etc / cfg_query.lua
1 --
2 -- Query module configuration.
3 --
4 -- Only bindings that are in effect in queries and message displays are
5 -- configured here. Actions to display queries are configured in
6 -- ion-bindings.lua
7 -- 
8
9
10 defbindings("WEdln", {
11     bdoc("Move one character forward/backward."),
12     kpress("Control+F", "WEdln.forward(_)"),
13     kpress("Control+B", "WEdln.back(_)"),
14     kpress("Right", "WEdln.forward(_)"),
15     kpress("Left", "WEdln.back(_)"),
16     
17     bdoc("Go to end/beginning."),
18     kpress("Control+E", "WEdln.eol(_)"),
19     kpress("Control+A", "WEdln.bol(_)"),
20     kpress("End", "WEdln.eol(_)"),
21     kpress("Home", "WEdln.bol(_)"),
22     
23     bdoc("Skip one word forward/backward."),
24     kpress("Control+X", "WEdln.skip_word(_)"),
25     kpress("Control+Z", "WEdln.bskip_word(_)"),
26
27     bdoc("Delete next character."),
28     kpress("Control+D", "WEdln.delete(_)"),
29     kpress("Delete", "WEdln.delete(_)"),
30     
31     bdoc("Delete previous character."),
32     kpress("BackSpace", "WEdln.backspace(_)"),
33     kpress("Control+H", "WEdln.backspace(_)"),
34     
35     bdoc("Delete one word forward/backward."),
36     kpress("Control+W", "WEdln.kill_word(_)"),
37     kpress("Control+O", "WEdln.bkill_word(_)"),
38
39     bdoc("Delete to end of line."),
40     kpress("Control+J", "WEdln.kill_to_eol(_)"),
41     
42     bdoc("Delete the whole line."),
43     kpress("Control+Y", "WEdln.kill_line(_)"),
44     
45     bdoc("Transpose characters."),
46     kpress("Control+T", "WEdln.transpose_chars(_)"),
47
48     bdoc("Select next/previous (matching) history entry."),
49     kpress("Control+P", "WEdln.history_prev(_)"),
50     kpress("Control+N", "WEdln.history_next(_)"),
51     kpress("Up", "WEdln.history_prev(_)"),
52     kpress("Down", "WEdln.history_next(_)"),
53     kpress("Control+Up", "WEdln.history_prev(_, true)"),
54     kpress("Control+Down", "WEdln.history_next(_, true)"),
55
56     bdoc("Paste from the clipboard."),
57     mclick("Button2", "WEdln.paste(_)"),
58     submap("Control+K", {
59         kpress("C", "WEdln.paste(_)"),
60         
61         bdoc("Set mark/begin selection."),
62         kpress("B", "WEdln.set_mark(_)"),
63         
64         bdoc("Cut selection."),
65         kpress("Y", "WEdln.cut(_)"),
66         
67         bdoc("Copy selection."),
68         kpress("K", "WEdln.copy(_)"),
69         
70         bdoc("Clear mark/cancel selection."),
71         kpress("G", "WEdln.clear_mark(_)"),
72
73         --bdoc("Transpose words."),
74         --kpress("T", "WEdln.transpose_words(_)"),
75     }),
76
77     bdoc("Try to complete the entered text or cycle through completions."),
78     kpress("Tab", "WEdln.complete(_, 'next', 'normal')"), 
79     kpress("Shift+Tab", "WEdln.complete(_, 'prev', 'normal')"),
80     -- Do not cycle; only force evaluation of new completions
81     kpress("Control+Tab", "WEdln.complete(_, nil, 'normal')"),
82     
83     bdoc("Complete from history"),
84     kpress("Control+R", "WEdln.complete(_, 'next', 'history')"),
85     kpress("Control+S", "WEdln.complete(_, 'prev', 'history')"),
86     
87     bdoc("Close the query and execute bound action."),
88     kpress("Control+M", "WEdln.finish(_)"),
89     kpress("Return", "WEdln.finish(_)"),
90     kpress("KP_Enter", "WEdln.finish(_)"),
91 })
92
93
94 defbindings("WInput", {
95     bdoc("Close the query/message box, not executing bound actions."),
96     kpress("Escape", "WInput.cancel(_)"),
97     kpress("Control+G", "WInput.cancel(_)"),
98     kpress("Control+C", "WInput.cancel(_)"),
99     
100     bdoc("Scroll the message or completions up/down."),
101     kpress("Control+U", "WInput.scrollup(_)"),
102     kpress("Control+V", "WInput.scrolldown(_)"),
103     kpress("Page_Up", "WInput.scrollup(_)"),
104     kpress("Page_Down", "WInput.scrolldown(_)"),
105 })
106
107
108 -- Some settings
109 --[[
110 mod_query.set{
111      -- Auto-show completions?    
112      autoshowcompl=true,
113      -- Delay for completion after latest keypress/modification in 
114      -- milliseconds
115      autoshowcompl_delay=250,
116 }
117 --]]