link-store: reject pokes without content

This commit is contained in:
Fang 2020-02-07 21:42:33 +01:00
parent deb3d26d3f
commit 2df646bd0a
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972

View File

@ -202,7 +202,7 @@
++ save-page ++ save-page
|= [=path title=@t =url] |= [=path title=@t =url]
^- (quip card _state) ^- (quip card _state)
?< =(~ path) ?< |(=(~ path) =(~ title) =(~ url))
:: add page to group ours :: add page to group ours
:: ::
=/ =links (~(gut by by-group) path *links) =/ =links (~(gut by by-group) path *links)
@ -228,6 +228,7 @@
++ note-note ++ note-note
|= [=path =url udon=@t] |= [=path =url udon=@t]
^- (quip card _state) ^- (quip card _state)
?< |(=(~ path) =(~ url) =(~ udon))
:: add note to discussion ours :: add note to discussion ours
:: ::
=/ urls (~(gut by discussions) path *(map ^url discussion)) =/ urls (~(gut by discussions) path *(map ^url discussion))