corrects (unit user) in :dns %hiss requests

This commit is contained in:
Joe Bryan 2019-01-13 21:47:51 -05:00
parent 48f9db13a9
commit 5359973e19

View File

@ -10,7 +10,7 @@
[%hall-action %phrase audience:hall (list speech:hall)] [%hall-action %phrase audience:hall (list speech:hall)]
== ==
+$ card +$ card
$% [%hiss wire [~ ~] %httr %hiss hiss:eyre] $% [%hiss wire (unit ~) %httr %hiss hiss:eyre]
[%poke wire dock poke] [%poke wire dock poke]
[%rule wire %turf %put turf] [%rule wire %turf %put turf]
[%wait wire @da] [%wait wire @da]
@ -416,12 +416,6 @@
:: +this: is sparta :: +this: is sparta
:: ::
++ this . ++ this .
:: +request: generic http request
::
++ request
|= [=wire =hiss:eyre]
^- card
[%hiss wire [~ ~] %httr %hiss hiss]
:: +notify: send :hall notification :: +notify: send :hall notification
:: ::
++ notify ++ notify
@ -626,7 +620,12 @@
|= car=card |= car=card
^+ this ^+ this
this(moz [[ost.bow car] moz]) this(moz [[ost.bow car] moz])
:: +request: authenticated http request
::
++ request
|= [=wire =hiss:eyre]
^- card
[%hiss wire [~ ~] %httr %hiss hiss]
:: +http-wire: build a wire for a |tell request :: +http-wire: build a wire for a |tell request
:: ::
++ http-wire ++ http-wire
@ -860,6 +859,12 @@
|= car=card |= car=card
^+ this ^+ this
this(moz [[ost.bow car] moz]) this(moz [[ost.bow car] moz])
:: +request: unauthenticated http request
::
++ request
|= [=wire =hiss:eyre]
^- card
[%hiss wire ~ %httr %hiss hiss]
:: +http-wire: build a wire for a |tell request :: +http-wire: build a wire for a |tell request
:: ::
++ http-wire ++ http-wire