X-Git-Url: https://git.phdru.name/?p=dotfiles.git;a=blobdiff_plain;f=.muttrc;h=c5ff07711c85c562ab2c302309c938af1f0a629b;hp=5b8293976c122c6ccdbfbd2c2c5778318440a64f;hb=5251876e9b3158749e93584439916c7a68d635f2;hpb=8635530c0d2dc87e18ad6670ce2e08bb151933ef

diff --git a/.muttrc b/.muttrc
index 5b82939..c5ff077 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,9 @@ macro pager,attach M \
    <exit><Home><change-folder>=sent-mail<Enter> \
    "Go to sent-mail"
 
+macro attach V "<save-entry>~/tmp/_xxx.html<Enter><shell-escape>webbrowser -n ~/tmp/_xxx.html; exec rm ~/tmp/_xxx.html<Enter>" \
+   "View html attachment in a web browser"
+
 # Go to python mailbox
 macro index Y \
    <Home><change-folder>=lists/python<Enter> \
@@ -351,20 +373,6 @@ macro pager,attach Y \
    <exit><Home><change-folder>=lists/python<Enter> \
    "Go to python"
 
-# Go to STCnet "Atlas"/STM mailboxes
-macro index \ca \
-   <Home><change-folder>=stcnet<Enter> \
-   "Go to stcnet inbox"
-macro pager,attach \ca \
-   <exit><Home><change-folder>=stcnet<Enter> \
-   "Go to stcnet inbox"
-macro index A \
-   <Home><change-folder>=sent-stcnet<Enter> \
-   "Go to sent-stcnet"
-macro pager,attach 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>" \