Removed bouquet for now.

This commit is contained in:
Fang 2017-06-30 17:37:28 -07:00
parent 4f7cf04850
commit 4aa069c9f8
6 changed files with 6 additions and 10 deletions

View File

@ -1891,7 +1891,6 @@
sen/serial
aud/audience
wen/@da
bou/bouquet
sep/speech
==
::
@ -1957,8 +1956,7 @@
%+ turn (~(tap by aud))
|= {a/partner *}
leaf+~(pr-full pr a)
=+ bok=(turn (sort (~(tap in bou)) aor) smyt)
[%rose [" " ~ ~] [hed >who< [%rose [", " "to " ~] paz] bok]]~
[%rose [" " ~ ~] [hed >who< [%rose [", " "to " ~] paz] ~]]~
::
++ tr-body ::< message content
::> long-form display of message contents, specific

View File

@ -419,7 +419,7 @@
%- ~(gas by *audience)
%+ turn (~(tap in pas))
|=(p/partner [p *envelope %pending])
[now.bol ~ i.ses]
[now.bol i.ses]
::
::> || %personal-metadata
::+|

View File

@ -58,7 +58,7 @@
^- thought
:+ (shaf %thot eny)
[[[%& our (main our)] [*envelope %pending]] ~ ~]
[now *bouquet [%app dap (crip ~(ram re i.mes))]]
[now [%app dap (crip ~(ram re i.mes))]]
::
++ uniq
|= eny/@uvJ

View File

@ -97,7 +97,7 @@
++ stam
^- $-(json (unit statement))
%+ cu eval
(ot date+di bouquet+(as (ar so)) speech+spec ~)
(ot date+di speech+spec ~)
::
++ spec
%+ ke *speech-or-eval |.

View File

@ -81,7 +81,7 @@
%+ sear (soft passport)
;~((glue fas) sym urs:ab) :: XX [a-z0-9_]{1,15}
::
++ stam (ot date+di bouquet+(as (ar so)) speech+spec ~)
++ stam (ot date+di speech+spec ~)
++ spec
%+ ke *speech |. ~+
%- of :~

View File

@ -189,7 +189,7 @@
::
++ telegram {aut/ship tot/thought} ::< who thought
++ thought {uid/serial aud/audience sam/statement} ::< which whom this
++ statement {wen/@da boq/bouquet sep/speech} ::< when what body
++ statement {wen/@da sep/speech} ::< when what body
++ speech ::> content body
$% {$non $~} ::< no content (yo)
{$lin pat/? msg/cord} ::< no/@ text line
@ -234,6 +234,4 @@
$released ::< sent one-way
$accepted ::< fully processed
== ::
++ bouquet (set flavor) ::< complete aroma
++ flavor path ::< content flavor
--