fix elinks viewer

[etc/mutt.git] / .mutt / edit-header

diff --git a/.mutt/edit-header b/.mutt/edit-header
index 3a3a96af76de9a5cc363cd8e490205b162bc60b3..ab7444bb5eb7b68f98666dd381c0434d7877fb22 100755 (executable)
--- a/.mutt/edit-header
+++ b/.mutt/edit-header
@@ -7,7 +7,7 @@
 # Copyright © 2008 martin f. krafft <madduck@madduck.net>
 # Released under the terms of the Artistic Licence 2.0
 #
-set -euvx
+set -eu
 
 if [ ! -x "$(command -v formail)" ]; then
   echo E: formail not installed. >&2
@@ -30,6 +30,10 @@ get_header_contents()
 
 script="${0%/*}/${2:-}"
 if [ -f "$script" ] && [ -x "$script" ]; then
+  if [ -z "${__RLWRAPPED:-}" ] && [ -x $(command -v rlwrap) ]; then
+    __RLWRAPPED=true exec rlwrap "$0" "$@"
+  fi
+
   contents_source="$script"
   shift
 else
@@ -60,8 +64,12 @@ case "$0" in
 
 esac
 
-echo "set my_editor=\"\$editor\'"
-echo "set editor=\"$editor\""
-echo "push <tag-prefix><edit>"
-# we need to push this so it happens after the editing
-echo "push :set editor=\"\$my_editor\"<enter>"
+echo "set my_editor=\"\$editor\""
+echo "set my_filter=\"$editor\""
+echo -n "push '"
+echo -n "<enter-command>set editor=\"\$my_filter\"<enter>"
+echo -n "<edit>"
+echo -n "<enter-command>set editor=\"\$my_editor\"<enter>"
+echo -n "<enter-command>unset my_filter<enter>"
+echo -n "<enter-command>unset my_editor<enter>"
+echo "'"