summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--mh/etc/replcomps7
-rw-r--r--mh/etc/replgroupcomps7
-rw-r--r--mh/repl.c21
3 files changed, 19 insertions, 16 deletions
diff --git a/mh/etc/replcomps b/mh/etc/replcomps
index 17241e96f..63fddf9eb 100644
--- a/mh/etc/replcomps
+++ b/mh/etc/replcomps
@@ -10,8 +10,9 @@
%(lit)%<(rcpt to)%(formataddr{to})%>%<(rcpt cc)%(formataddr{cc})%>%<(rcpt me)%(formataddr(me))%>\
%<(nonnull)%(void(width))%(putaddr cc: )\n%>\
%<(mymbox{from})%<{fcc}Fcc: %{fcc}\n%>%>\
-%<{subject}%(lit)%<(isreply)%?(profile reply-prefix)%(concat)%|%(concat Re:)%>%(concat{subject})%(printhdr Subject: )\n%>\
-%(lit)%(concat(in_reply_to))%<(nonnull)%(void(width))%(printhdr In-reply-to: )\n%>\
-%(lit)%(concat(references))%<(nonnull)%(void(width))%(printhdr References: )\n%>\
+Subject: %<{subject}%(putstr %<(profile reply-prefix)%|\
+%(void Re:)%>) %(void(unre{subject}))%(trim)%(putstr)%>
+%(lit)%<(in_reply_to)%(void(width))%(printhdr In-reply-to: )\n%>\
+%(lit)%<(references)%(void(width))%(printhdr References: )\n%>\
--------
diff --git a/mh/etc/replgroupcomps b/mh/etc/replgroupcomps
index bbd51826a..e9aa305d3 100644
--- a/mh/etc/replgroupcomps
+++ b/mh/etc/replgroupcomps
@@ -14,8 +14,9 @@
%<(nonnull)%(void(width))%(putaddr cc: )\n%>%>\
%;
%<(mymbox{from})%<{fcc}Fcc: %{fcc}\n%>%>\
-%<{subject}%(lit)%<(isreply{subject})%?(profile reply-prefix)%(concat)%|%(concat Re:)%>%(concat{subject})%(printhdr Subject: )\n%>\
-%(lit)%(concat(in_reply_to))%<(nonnull)%(void(width))%(printhdr In-reply-to: )\n%>\
-%(lit)%(concat(references))%<(nonnull)%(void(width))%(printhdr References: )\n%>\
+Subject: %<{subject}%(putstr %<(profile reply-prefix)%|\
+%(void Re:)%>) %(void(unre{subject}))%(trim)%(putstr)%>
+%(lit)%<(in_reply_to)%(void(width))%(printhdr In-reply-to: )\n%>\
+%(lit)%<(references)%(void(width))%(printhdr References: )\n%>\
--------
diff --git a/mh/repl.c b/mh/repl.c
index e1dca9681..277d6df81 100644
--- a/mh/repl.c
+++ b/mh/repl.c
@@ -173,16 +173,17 @@ static struct mu_option options[] = {
};
static char default_format_str[] =
-"%(lit)%(formataddr %<{reply-to}%?{from}%?{sender}%?{return-path}%>)"
-"%<(nonnull)%(void(width))%(putaddr To: )\\n%>"
-"%(lit)%<(rcpt to)%(formataddr{to})%>%<(rcpt cc)%(formataddr{cc})%>%<(rcpt me)%(formataddr(me))%>"
-"%<(nonnull)%(void(width))%(putaddr cc: )\\n%>"
-"%<{fcc}Fcc: %{fcc}\\n%>"
-"%<{subject}Subject: Re: %(unre{subject})\\n%>"
-"%(lit)%(concat(in_reply_to))%<(nonnull)%(void(width))%(printhdr In-reply-to: )\\n%>"
-"%(lit)%(concat(references))%<(nonnull)%(void(width))%(printhdr References: )\\n%>"
-"X-Mailer: MH \\(%(package_string)\\)\\n"
-"--------\n";
+ "%(lit)%(formataddr %<{reply-to}%?{from}%?{sender}%?{return-path}%>)"
+ "%<(nonnull)%(void(width))%(putaddr To: )\\n%>"
+ "%(lit)%<(rcpt to)%(formataddr{to})%>%<(rcpt cc)%(formataddr{cc})%>%<(rcpt me)%(formataddr(me))%>"
+ "%<(nonnull)%(void(width))%(putaddr cc: )\\n%>"
+ "%<(mymbox{from})%<{fcc}Fcc: %{fcc}\\n%>%>"
+ "Subject: %<{subject}%(putstr %<(profile reply-prefix)%|"
+ "%(void Re:)%>) %(void(unre{subject}))%(trim)%(putstr)%>\n"
+ "%(lit)%<(in_reply_to)%(void(width))%(printhdr In-reply-to: )\\n%>"
+ "%(lit)%<(references)%(void(width))%(printhdr References: )\\n%>"
+ "X-Mailer: MH (%(package_string))\n"
+ "--------\n";
void
make_draft (mu_mailbox_t mbox, int disp, struct mh_whatnow_env *wh)

Return to:

Send suggestions and report system problems to the System administrator.