emacs
/
mu
mirror of https://github.com/djcb/mu.git
1
0
Fork 0
Code Issues Releases Wiki Activity

message-sexp: Add :modified and :reply-to

This commit is contained in:
Dirk-Jan C. Binnema 2022-05-01 11:24:51 +03:00
parent e1a0ea49f3
commit e067bca090
1 changed files with 11 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
lib/message/mu-message-sexp.cc
View File

@ -106,7 +106,9 @@ add_contacts(Sexp::List& list, const Message& message)
add_contact_type(message.cc(), ":cc");
add_contact_type(message.bcc(), ":bcc");
// FIXME: reply-to.
const auto reply_to = seq_filter(message.all_contacts(),[](auto &&c) {
return c.type == Contact::Type::ReplyTo; });
add_contact_type(reply_to, ":reply-to");
}
static void
@ -125,14 +127,16 @@ add_flags(Sexp::List& list, const Message& message)
static void
add_date_and_size(Sexp::List& items, const Message& message)
{
auto t{message.date()};
if (t != 0) {
auto emacs_tstamp = [](::time_t t) {
Sexp::List dlist;
dlist.add(Sexp::make_number((unsigned)(t >> 16)));
dlist.add(Sexp::make_number((unsigned)(t & 0xffff)));
dlist.add(Sexp::make_number(static_cast<unsigned>(t >> 16)));
dlist.add(Sexp::make_number(static_cast<unsigned>(t & 0xffff)));
dlist.add(Sexp::make_number(0));
items.add_prop(":date", Sexp::make_list(std::move(dlist)));
}
return Sexp::make_list(std::move(dlist));
};
items.add_prop(":date", emacs_tstamp(message.date()));
items.add_prop(":modified", emacs_tstamp(message.modified()));
auto size{message.size()};
if (size != 0)