X-Git-Url: https://git.phdru.name/?p=dotfiles.git;a=blobdiff_plain;f=.muttrc;h=5b8293976c122c6ccdbfbd2c2c5778318440a64f;hp=a93e8bbab49f648c0d21d963c28cbc147f9c06b2;hb=HEAD;hpb=9ae7efa3885fe5b8a34066245de63293d75611a1

diff --git a/.muttrc b/.muttrc
index a93e8bb..b347d4f 100644
--- a/.muttrc
+++ b/.muttrc
@@ -299,6 +299,25 @@ bind index,pager <Esc>S decode-save
 # Macros
 #
 
+# KP_Enter -> Enter
+#macro generic,pager,editor <F79> <Enter>
+# KP_Home -> Home
+macro generic,pager,editor <F84> <Home>
+# KP_Up -> Up
+macro generic,pager,editor \1074 <Up>
+# KP_Next -> PageUp
+macro generic,pager,editor <F85> <PageUp>
+# KP_Left -> Left
+macro generic,pager,editor \1075 <Left>
+# KP_Right -> Right
+macro generic,pager,editor \1076 <Right>
+# KP_End -> End
+macro generic,pager,editor <F87> <End>
+# KP_Down -> Down
+macro generic,pager,editor \1077 <Down>
+# KP_Prev -> PageDown
+macro generic,pager,editor <F88> <PageDown>
+
 macro index C \
    <Home><change-folder><Enter> \
    "Go to the first folder with unread messages"
@@ -310,10 +329,10 @@ macro index,pager S \
    <save-message>!<Enter> \
    "Move current message to inbox"
 
-macro index,pager <Esc>h \
+macro index,pager,attach <Esc>h \
    ":auto_view text/html<Enter>" \
    "View HTML attachments"
-macro index,pager <Esc>H \
+macro index,pager,attach <Esc>H \
    ":unauto_view text/html<Enter>" \
    "Don't show HTML attachments"
 
@@ -343,6 +362,14 @@ macro pager,attach M \
    <exit><Home><change-folder>=sent-mail<Enter> \
    "Go to sent-mail"
 
+macro index,pager \cV "<show-version>" \
+   "Show version"
+
+macro index,pager V "v/text/html<Enter>V" \
+   "View the 1st html attachment in a web browser"
+macro attach V "<save-entry>~/tmp/_xxx.html<Enter>n<shell-escape>webbrowser -n ~/tmp/_xxx.html; exec rm ~/tmp/_xxx.html<Enter><exit>" \
+   "View html attachment in a web browser"
+
 # Go to python mailbox
 macro index Y \
    <Home><change-folder>=lists/python<Enter> \
@@ -351,20 +378,6 @@ macro pager,attach Y \
    <exit><Home><change-folder>=lists/python<Enter> \
    "Go to python"
 
-# Go to STCnet "Atlas"/STM mailboxes
-macro index A \
-   <Home><change-folder>=stcnet<Enter> \
-   "Go to stcnet inbox"
-macro pager,attach A \
-   <exit><Home><change-folder>=stcnet<Enter> \
-   "Go to stcnet inbox"
-macro index <Esc>a \
-   <Home><change-folder>=sent-stcnet<Enter> \
-   "Go to sent-stcnet"
-macro pager,attach <Esc>a \
-   <exit><Home><change-folder>=sent-stcnet<Enter> \
-   "Go to sent-stcnet"
-
 # Recode base64 to 8bit, html to plain text, mustdie-1251 to koi8-r, etc.
 macro index,pager \
    <Esc>m "<pipe-message>mimedecode | less<Enter>" \