readline.inc.pl

   1 use utf8;
   2
   3 '' => {
   4         desc => "emacs mode",
   5
   6         '+<' => ["history start", 'co'],
   7         '+=' => '+?', #TODO: new # emacs, not in v2.0
   8         '+>' => ["history end", 'co'],
   9         '^?' => '^h',
  10         '+?' => ["list complet$sign{_}ion$sign{_}s", 'ci'],
  11         '^@' => ["set mark", 'mv new'], # not in v2.0
  12
  13         '+#' => ["prefix comm$sign{_}en$sign{_}t", 'mi new'], # not in v2.0
  14         '+&' => ["tilde expand", 'mi'],
  15         '+*' => ["complet$sign{_}e all", 'mi new'], # not in v2.0
  16         '+.' => ["insert last", 'co'],
  17         '+~' => '+&', # emacs
  18
  19         '^[' => ["meta", 'mv'],
  20         '^+['=> '^i',
  21         '+\\'=> ["delete whitesp$sign{_}ace", 'mo'],
  22         '^]' => ["find char", 'pm arg new'], # not in v2.0
  23         '^+]'=> ["rev find char", 'pm arg new'], # not in v2.0
  24         '^_' => ["undo", 'co'],
  25         '+_' => '+.',
  26
  27         '+~' => ["user$sign{_}name exp$sign{_}and", 'mi ext'], # common emacs => '+&'
  28         '+!' => ["cmd expand", 'mi ext'],
  29         '+@' => ["host$sign{_}name exp$sign{_}and", 'mi ext'],
  30         '+$' => ["variable expand", 'mi ext'],
  31         '+^' => ["history expand", 'co ext'],
  32         '+/' => ["filename expand", 'ci ext'],
  33
  34         '^a' => ["begin of line", 'pm'],
  35         '^b' => ["char back$sign{_}w$sign{_}ard$sign{_}s", 'pm'],
  36         '+b' => ["word back$sign{_}w$sign{_}ard$sign{_}s", 'pm'],
  37         '+c' => ["capital$sign{_}ise word", 'mi'],
  38         '^d' => ["delete char", 'mo'],
  39         '+d' => ["delete word rem$sign{_}ain$sign{_}der", 'mo ring'],
  40 #       '^e' => ["emacs mode", 'me'],
  41         '^e' => ["end of line", 'pm'],
  42         '^f' => ["char forward", 'pm'],
  43         '+f' => ["word forward", 'pm'],
  44         '^g' => ["abort cmd, bell", 'mv'],
  45         '^+g'=> '^g',
  46         '^h' => ["back$sign{_}space", 'mo'],
  47         '^+h'=> ["delete bound word", 'mo ring'], #TODO
  48         '^i' => ["auto$sign{_}complet$sign{_}e", 'mi', '(tab)'],
  49         '^+i'=> '^v^i',
  50         '^j' => '^m',
  51         '^+j'=> ["vim mode", 'me'], #TODO: mode^+j
  52         '^k' => ["delete till eol", 'mo ring'],
  53         '^l' => ["clear screen", 'ci'],
  54         '+l' => ["lowcase word", 'mi'],
  55         '^m' => ["enter line", 'co', '(enter)'],
  56         '^+m'=> '^+j',
  57         '^n' => ["history next", 'co'],
  58         '+n' => ["match history", 'co'],
  59         '^o' => ["enter and next", 'co ext'],
  60         '^p' => ["history back", 'co'],
  61         '+p' => ["rev match history", 'co'],
  62         '^q' => '^v', # Quote
  63         '^r' => ["reverse history", 'co'],
  64         '+r' => ["full undo", 'co', 'Revert'],
  65         '^+r'=> '+r',
  66         '^s' => ["search history", 'co'],
  67         '^t' => ["move char forw$sign{_}ard", 'mi', 'Transpose char'],
  68         '+t' => ["move word forw$sign{_}ard", 'mi', 'Transpose word'],
  69         '^u' => ["delete till bol", 'mo ring'], # unix
  70         '+u' => ["upcase word", 'mi'],
  71         '^v' => ["verbatim char", 'mv'],
  72         '^w' => ["delete word", 'mo ring'], # unix
  73         '^x' => ["extend$sign{_}ed", 'me arg mode^x'],
  74         '^y' => ["yank top", 'co'],
  75         '+y' => ["rotate yank", 'co ring'],
  76         '^+y'=> ["yank arg"],
  77 },
  78
  79 '^x' => {
  80         lead => $ascii ? "'x"  : "x̂",
  81         desc => 'emacs ctrl-x bindings',
  82
  83         '('  => ["start macro", 'mv'],
  84         ')'  => ["end macro", 'mv'],
  85         'e'  => ["run macro", 'mv', 'Execute'],
  86         '^e' => ["editor", 'mi ext linkvim'],
  87         '^g' => '^g',
  88         '^h' => '^u',
  89         '^r' => ["reload inputrc", 'mv'],
  90         '^u' => '^_',
  91         '^x' => ["swap cursor", 'pm new', 'eXchange'], # not in v2.0
  92         '^v' => ["shell version", 'ci ext'],
  93         '^?' => '^x^h',
  94 },
  95