mutt: add a script to deal with html escapes

dotfiles/neomutt/neomuttrc

@@ -148,7 +148,7 @@ set markers = no
 set date_format="%m/%d %H:%M"
 set index_format="%2C %zs %?X?A& ? %D %-15.15F %s"
 
-set display_filter  = 'sed -e "s/ */\n/g"'
+set display_filter  = '_mutt_escape-html-chars'
 
 #}}}
 # colors{{{

dotfiles/scripts/_mutt_escape-html-chars

@@ -0,0 +1,18 @@
+#!/bin/sh
+
+while read line; do
+    sed_args=""
+    for html_code in $(echo "$line" | grep -E '&[a-zA-Z]*?;' -o); do
+        case "$html_code" in
+            " ")
+                character="\n"
+                ;;
+            *)
+                character=$(echo "$html_code" | recode html)
+                ;;
+        esac
+        test -n "$character" &&
+            sed_args="$sed_args""s/$html_code/$character/g;"
+    done
+    echo "$line" | sed "$sed_args"
+done