mutt.inc.pl

   1 use utf8;
   2
   3 my %common = (
   4         "\e"=> 'me mode',
   5
   6         'H' => 'pm', # top-page
   7         'j' => 'pm', # next-entry, next-undeleted
   8         'k' => 'pm', # previous-entry, previous-undeleted
   9         'L' => 'pm', # bottom-page
  10         '^l'=> 'ci', # refresh
  11         'M' => 'pm', # middle-page
  12         '^m'=> 'mi mode^m', # select-entry, display-message
  13         'n' => 'po', # search-next
  14         'q' => 'mv mode', # exit
  15         't' => 'co', # tag-entry
  16         'z' => 'pm', # next-page
  17         'Z' => 'pm', # previous-page
  18
  19         '*' => 'pm', # last-entry
  20         '=' => 'pm', # first-entry
  21         ':' => 'mi', # enter-command
  22         ';' => 'mi arg', # tag-prefix
  23         '>' => 'pm', # next-line
  24         '<' => 'pm', # previous-line
  25         ']' => 'pm', # half-down
  26         '[' => 'pm', # half-up
  27         '?' => 'ci', # help
  28         '!' => 'ci arg', # shell
  29         '/' => 'po arg mode/~', # search
  30         '+/'=> 'po arg mode/~', # search
  31 );
  32
  33 {
  34
  35 '' => {
  36         %common,
  37
  38         '@' => 'ci', # display-address
  39         '.' => 'mv', # buffy-list #TODO
  40         '|' => 'mi', # pipe-message
  41         '$' => 'co', # sync-mailbox
  42         '#' => 'co', # break-thread
  43         '&' => 'co', # link-threads
  44         '%' => 'co', # toggle-write
  45         ' ' => '=^m',
  46
  47         'a' => 'mi', # create-alias
  48         'b' => 'mo', # bounce-message
  49         '^b'=> 'ci',
  50         '+b'=> undef, # M <search>~b
  51         'c' => 'mv', # change-folder
  52         'C' => 'mi', # copy-message
  53         '+c'=> 'mv', # change-folder-readonly
  54         '+C'=> undef, # decode-copy
  55         'd' => 'co', # delete-message
  56         'D' => 'co arg', # delete-pattern
  57         '^d'=> 'co', # delete-thread
  58         '+d'=> 'co', # delete-subthread
  59         'e' => 'co linkvi', # edit
  60         '^e'=> 'co', # edit-type
  61         '+e'=> undef, # resend-message
  62         'f' => 'mo modem', # forward-message
  63         'F' => 'co', # flag-message
  64         '^f'=> 'mi', # forget-passphrase
  65         'g' => 'mo modem', # group-reply
  66         'G' => 'mi', # fetch-mail
  67         'h' => 'me', # display-toggle-weed
  68         '^i'=> 'po', # next-new-then-unread
  69         '+^i'=> undef, # previous-new-then-unread
  70         'j' => 'pm', # next-undeleted
  71         'k' => 'pm', # previous-undeleted
  72         'J' => 'po', # next-entry
  73         'K' => 'po', # previous-entry
  74         '^k'=> 'ci', # extract-keys
  75         '+k'=> 'mo modem', # mail-key
  76         'l' => 'me', # limit
  77         'L' => 'mo modem', # list-reply
  78         '+l'=> 'ci', # show-limit
  79         'm' => 'mo modem', # mail
  80         'N' => 'co', # toggle-new
  81         '^n'=> 'po', # next-thread
  82         '+n'=> 'po', # next-subthread
  83         'o' => 'me modeo', # sort-mailbox
  84         'O' => 'me modeo', # sort-reverse
  85         'p' => 'ci', # print-message
  86         'P' => 'po', # parent-message
  87         '^p'=> 'po', # previous-thread
  88         '+p'=> 'po', # previous-subthread
  89         '+P'=> undef, # check-traditional-pgp
  90         'q' => 'mv', # quit
  91         'Q' => 'ci arg', # query
  92         'r' => 'mo modem', # reply
  93         'R' => 'mo modem', # recall-message
  94         '^r'=> 'co', # read-thread
  95         '+r'=> 'co', # read-subthread
  96         's' => 'co', # save-message
  97         '+s'=> 'co', # decode-save
  98         'T' => 'co arg', # tag-pattern
  99         '^t'=> 'co', # untag-pattern
 100         '+t'=> 'co', # tag-thread
 101         'u' => 'co', # undelete-message
 102         'U' => 'co arg', # undelete-pattern
 103         '^u'=> 'co', # undelete-thread
 104         '+u'=> 'co', # undelete-subthread
 105         'v' => 'ci', # view-attachments
 106         'V' => 'ci', # show-version
 107         '+v'=> 'me', # collapse-thread
 108         '+V'=> 'me', # collapse-all
 109         'w' => 'co arg modew', # set-flag
 110         'W' => 'co arg modew', # clear-flag
 111         'x' => 'mv', # exit
 112         'y' => 'mv', # M <change-folder>?<toggle-mailboxes>
 113 }, # index
 114
 115 'm' => {
 116         %common,
 117
 118         '|' => 'co',
 119         'a' => 'mi',
 120         'A' => 'mi',
 121         'b' => 'co',
 122         'c' => 'co',
 123         'C' => 'mi',
 124         'd' => 'co',
 125         'D' => 'co',
 126         '^d'=> 'co',
 127         'e' => 'co linkvi',
 128         'E' => 'co linkvi',
 129         '^e'=> 'co',
 130         'f' => 'co',
 131         '^f'=> 'mi',
 132         '+f'=> 'co',
 133         'F' => 'co',
 134         'G' => 'ci',
 135         'h' => 'ci',
 136         'i' => 'mi',
 137         'l' => 'ci',
 138         'm' => 'co',
 139         'M' => 'co',
 140         '^m'=> 'ci',
 141         'n' => 'mi',
 142         'P' => 'mv mode',
 143         'r' => 'co',
 144         'R' => 'co',
 145         's' => 'co',
 146         'S' => 'co menumS',
 147         't' => 'co',
 148         '^t'=> 'co',
 149         'w' => 'mi',
 150         'u' => 'mi',
 151         'U' => 'co',
 152         'y' => 'mo',
 153 }, # compose
 154
 155 w => {
 156         "\e"=> 'me mode',
 157         'D' => 'co',
 158         'd' => '=wD',
 159         'N' => 'co',
 160         'n' => '=wN',
 161         'O' => 'co',
 162         'o' => '=wO',
 163         'r' => 'co',
 164         'R' => '=wr',
 165         '*' => 'co',
 166         '!' => 'co',
 167 }, # flag
 168
 169 '/~' => {
 170         "\e"=> 'me mode',
 171         A => undef,
 172         b => 'X arg',
 173         B => 'arg',
 174         c => 'arg',
 175         C => 'arg',
 176         d => 'arg',
 177         D => undef,
 178         e => 'arg',
 179         E => undef,
 180         f => 'arg',
 181         F => undef,
 182         g => undef,
 183         G => undef,
 184         h => 'arg',
 185         H => 'arg',
 186         i => 'arg',
 187         k => undef,
 188         L => 'arg',
 189         l => undef,
 190         m => 'arg',
 191         n => 'arg',
 192         N => undef,
 193         O => undef,
 194         p => undef,
 195         P => undef,
 196         Q => undef,
 197         r => 'arg',
 198         R => undef,
 199         s => undef,
 200         S => undef,
 201         t => 'arg',
 202         T => undef,
 203         u => undef,
 204         U => undef,
 205         v => undef,
 206         V => undef,
 207         x => 'arg',
 208         X => 'arg',
 209         y => 'arg',
 210         z => 'arg',
 211         '=' => undef,
 212         '$' => undef,
 213         '(' => 'arg',
 214 }, # search option
 215
 216 }