diff options
| author | polwex <polwex@sortug.com> | 2025-09-17 12:24:41 +0700 |
|---|---|---|
| committer | polwex <polwex@sortug.com> | 2025-09-17 12:24:41 +0700 |
| commit | 387af8fc1603805b02ce03f8adba4fa73a954f7c (patch) | |
| tree | 6ac4fe9c33a14d9da418a97955a38efb9338d869 /backupdesk/mar/mime.hoon | |
| parent | 31a47ce72255bb56920e417d250541b04be82648 (diff) | |
relay much more robust
Diffstat (limited to 'backupdesk/mar/mime.hoon')
| -rw-r--r-- | backupdesk/mar/mime.hoon | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/backupdesk/mar/mime.hoon b/backupdesk/mar/mime.hoon new file mode 100644 index 0000000..83b4dae --- /dev/null +++ b/backupdesk/mar/mime.hoon @@ -0,0 +1,32 @@ +:: +:::: /hoon/mime/mar + :: +/? 310 +:: +|_ own=mime +++ grow + ^? + |% + ++ jam `@`q.q.own + -- +:: +++ grab :: convert from + ^? + |% + ++ noun mime :: clam from %noun + ++ tape + |=(a=_"" [/application/x-urb-unknown (as-octt:mimes:html a)]) + -- +++ grad + ^? + |% + ++ form %mime + ++ diff |=(mime +<) + ++ pact |=(mime +<) + ++ join |=([mime mime] `(unit mime)`~) + ++ mash + |= [[ship desk mime] [ship desk mime]] + ^- mime + ~|(%mime-mash !!) + -- +-- |