genlongsubject() {
len="${1:-998}"
awk -v len="$len" 'BEGIN {
- prefix = "Subject: " len
+ prefix = "Subject: " len " "
while (i++<len) {
s = s "x"
}
- re = ".{" length(prefix) "}."
- sub(re, prefix " ", s)
- print s
+ print prefix substr(s, length(prefix) + 1)
}'
}
}
+# Ensure lines won't get folded
+echo "mhl: -width 2000" >> "$MMH/profile"
+trap 'printf "/^mhl:/d\nw\nq\n" | ed - "$MMH/profile"' 0 1 2 15
+
+
len=997
# Write message with long header line