50 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			Perl
		
	
	
	
	
	
			
		
		
	
	
			50 lines
		
	
	
		
			1.1 KiB
		
	
	
	
		
			Perl
		
	
	
	
	
	
| 
 | |
| %buf_funcname = (
 | |
|  'BUF:PREV', 'buffer_prev',
 | |
|  'BUF:NEXT', 'buffer_next',
 | |
|  'BUF:DELETE', 'buffer_delete',
 | |
|  'BUF:GO', 'buffer_go',
 | |
| );
 | |
| 
 | |
| %lineedit_funcname = (
 | |
|  'LINEEDIT:FORWARD', 'lineedit_forward',
 | |
|  'LINEEDIT:BACK', 'lineedit_back',
 | |
|  'LINEEDIT:BS', 'lineedit_backspace',
 | |
|  'LINEEDIT:DEL', 'lineedit_delete',
 | |
|  'LINEEDIT:KILL_AFTER', 'lineedit_kill_after',
 | |
|  'LINEEDIT:KILL_BEFORE', 'lineedit_kill_before',
 | |
|  'LINEEDIT:TOP', 'lineedit_top',
 | |
|  'LINEEDIT:BOTTOM', 'lineedit_bottom',
 | |
|  'LINEEDIT:PREV', 'lineedit_prev',
 | |
|  'LINEEDIT:NEXT', 'lineedit_next',
 | |
|  'LINEEDIT:COMPLETE', 'lineedit_complete',
 | |
|  'LINEEDIT:ACCEPT', 'lineedit_accept',
 | |
| );
 | |
| 
 | |
| %buf_keyfunc = (
 | |
|  'k', 'BUF:PREV',
 | |
|  'C-p', 'BUF:PREV',
 | |
|  'j', 'BUF:NEXT',
 | |
|  'C-n', 'BUF:NEXT',
 | |
|  'D', 'BUF:DELETE',
 | |
|  'RET', 'BUF:GO'
 | |
| );
 | |
| 
 | |
| %lineedit_keyfunc = (
 | |
|  'C-f', 'LINEEDIT:FORWARD',
 | |
|  'C-b', 'LINEEDIT:BACK',
 | |
|  'C-h', 'LINEEDIT:BS',
 | |
|  'C-d', 'LINEEDIT:DEL',
 | |
|  'C-k', 'LINEEDIT:KILL_AFTER',
 | |
|  'C-u', 'LINEEDIT:KILL_BEFORE',
 | |
|  'C-a', 'LINEEDIT:TOP',
 | |
|  'C-e', 'LINEEDIT:BOTTOM',
 | |
|  'C-p', 'LINEEDIT:PREV',
 | |
|  'C-n', 'LINEEDIT:NEXT',
 | |
|  'TAB', 'LINEEDIT:COMPLETE',
 | |
|  'SPC', 'LINEEDIT:COMPLETE',
 | |
|  'RET', 'LINEEDIT:ACCEPT'
 | |
| );
 | |
| 
 | |
| 1;
 |