mutt: message flag keys
authorMischa POSLAWSKY <perl@shiar.org>
Sat, 16 May 2009 00:22:09 +0000 (00:22 +0000)
committerMischa POSLAWSKY <perl@shiar.org>
Sat, 16 May 2009 00:22:09 +0000 (00:22 +0000)
mutt.inc.pl

index fdb4269..8dfaa02 100644 (file)
@@ -104,8 +104,8 @@ my %common = (
        'V' => ["version", 'ci'], # show-version
        '+v'=> ["(un)collapse thread", 'me'], # collapse-thread
        '+V'=> ["(un)collapse threads", 'me'], # collapse-all
-       'w' => ["set flag", 'co arg'], # set-flag
-       'W' => ["clear flag", 'co arg'], # clear-flag
+       'w' => ["set flag", 'co arg modew'], # set-flag
+       'W' => ["clear flag", 'co arg modew'], # clear-flag
        'x' => ["abort", 'mv'], # exit
        'y' => ["list incoming mailboxes", 'mv'], # M <change-folder>?<toggle-mailboxes>
 }, # index
@@ -121,9 +121,9 @@ my %common = (
        'b' => ["edit bcc", 'co'],
        'c' => ["edit cc", 'co'],
        'C' => ["copy file", 'mi'],
-       'D' => ["delete entry", 'co'],
-       '^d'=> ["dispo$sign{_}sition tog$sign{_}gle", 'co'],
        'd' => ["desc$sign{_}ribe attach$sign{_}m$sign{_}ent", 'co'],
+       'D' => ["delete attach$sign{_}m$sign{_}ent", 'co'],
+       '^d'=> ["dispo$sign{_}sition tog$sign{_}gle", 'co'],
        'e' => ["edit body", 'co linkvi'],
        'E' => ["edit all", 'co linkvi'],
        '^e'=> ["edit encoding", 'co'],
@@ -152,6 +152,21 @@ my %common = (
        'y' => ["send", 'mo'],
 }, # compose
 
+w => {
+       desc => 'message flags (w)',
+
+       'D' => ["deleted", 'co'],
+       'd' => 'wD',
+       'N' => ["new", 'co'],
+       'n' => 'wN',
+       'O' => ["old", 'co'],
+       'o' => 'wO',
+       'r' => ["replied", 'co'],
+       'R' => 'wr',
+       '*' => ["tagged", 'co'],
+       '!' => ["flagged", 'co'],
+}, # flag
+
 '/~' => {
        desc => 'search flags (/~)',