tag-prefix a number of commands

[etc/mutt.git] / .mutt / keybindings

diff --git a/.mutt/keybindings b/.mutt/keybindings
index d88fddd7496d636f5542c74a454aed3fdfa85e81..35a1d59dfabf52a2e48953cb64922722653f840c 100644 (file)
--- a/.mutt/keybindings
+++ b/.mutt/keybindings
@@ -1,6 +1,7 @@
 bind index,pager       |       pipe-message
 bind index,pager       !       flag-message
-bind index,pager       \ep     print-message
+macro index,pager      \ep     "<pipe-message>muttprint -p TO_FILE:$tmpdir/muttprint.ps -D && gv $tmpdir/muttprint.ps && rm $tmpdir/muttprint.ps<enter>"
+bind index,pager       \eP     print-message
 bind index,pager       <up>    previous-entry
 bind index,pager       <down>  next-entry
 bind index,pager       p       previous-undeleted
@@ -18,8 +19,8 @@ bind pager,index      <backtab>       previous-unread
 ##bind index   n       next-undeleted
 
 ##macro index  L       "<list-reply><save-message>=store<enter>"
-macro index,pager      S       "<save-message>=store<enter><sync-mailbox>" "save message to store"
-macro index,pager      E       ':set my_editor="$editor"<enter>:set editor="$my_confdir/add-tickle-stamp"<enter><edit><toggle-new><save-message>=tickler<enter><sync-mailbox>:set editor="$my_editor"<enter>' "schedule message with tickler"
+macro index,pager      S       "<tag-prefix><save-message>=store<enter><sync-mailbox>" "save message to store"
+macro index,pager      E       ':set my_editor="$editor"<enter>:set editor="$my_confdir/add-tickle-stamp"<enter><edit><toggle-new><save-message>=resubmit<enter><sync-mailbox>:set editor="$my_editor"<enter>' "schedule message with tickler"
 
 macro index,pager      \eS     "<decode-save>"
 macro index,pager      \eU     "<undelete-subthread>"
@@ -33,8 +34,8 @@ macro index,pager     \ea     "<change-folder>=admin<enter>" "go to admin folder"
 macro index,pager      \eR     ":source $my_confdir/muttrc<enter>" "reload muttrc"
 macro compose  \eR     ":source $my_confdir/muttrc<enter>" "reload muttrc"
 
-macro index,pager      X       "<save-message>=retrain/spam<enter>" "retrain message as spam"
-macro index,pager      Z       "<save-message>=retrain/ham<enter>" "retrain message as ham"
+macro index,pager      X       "<tag-prefix><save-message>=retrain/spam<enter>" "retrain message as spam"
+macro index,pager      Z       "<tag-prefix><save-message>=retrain/ham<enter>" "retrain message as ham"
 
 macro index,pager      \Cb     ':set my_pipe_decode="$pipe_decode"<enter>:set pipe_decode<enter><pipe-message>/usr/bin/urlview<enter>:set pipe_decode="$my_pipe_decode"<enter>' "invoke urlview"