refactor(sterni/blërg): clean up header concatenation code
Change-Id: I775bff10f8d74f457fff3742ea198efadabcd67c Reviewed-on: https://cl.tvl.fyi/c/depot/+/13018 Autosubmit: sterni <sternenseemann@systemli.org> Reviewed-by: sterni <sternenseemann@systemli.org> Tested-by: BuildkiteCI
This commit is contained in:
parent
5db216b4ef
commit
69bb8b1423
1 changed files with 2 additions and 2 deletions
|
|
@ -49,9 +49,9 @@ headerNames ← "X-Uniform-Type-Identifier"‿"X-Universally-Unique-Identifier"
|
||||||
MailNotesBackend ← {𝕊 mailDir:
|
MailNotesBackend ← {𝕊 mailDir:
|
||||||
Entries ⇐ {𝕊:
|
Entries ⇐ {𝕊:
|
||||||
ms ← LR "mlist"‿mailDir
|
ms ← LR "mlist"‿mailDir
|
||||||
th ← ⍉⟨≠ms,≠headerNames⟩⥊headerNames Hdrs ms
|
th ← ⟨≠ms,≠headerNames⟩⥊headerNames Hdrs ms
|
||||||
dh ← Dates ms
|
dh ← Dates ms
|
||||||
ah ← (("com.apple.mail-note"⊸≡⊑)˘/⊢) ⍉th∾dh≍ms
|
ah ← (("com.apple.mail-note"⊸≡⊑)˘/⊢) th∾˘dh≍˘ms
|
||||||
{𝕊 ·‿uuid‿title‿time‿path:
|
{𝕊 ·‿uuid‿title‿time‿path:
|
||||||
title ⇐ ⋄ time ⇐
|
title ⇐ ⋄ time ⇐
|
||||||
id ⇐ AsciiDown uuid
|
id ⇐ AsciiDown uuid
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue