From 5359973e1993b6a3675f4be45521530a6924e4a9 Mon Sep 17 00:00:00 2001
From: Joe Bryan <joemfb@gmail.com>
Date: Sun, 13 Jan 2019 21:47:51 -0500
Subject: [PATCH 1/3] corrects (unit user) in :dns %hiss requests

---
 app/dns.hoon | 21 +++++++++++++--------
 1 file changed, 13 insertions(+), 8 deletions(-)

diff --git a/app/dns.hoon b/app/dns.hoon
index a58b067eda..7a8c24638d 100644
--- a/app/dns.hoon
+++ b/app/dns.hoon
@@ -10,7 +10,7 @@
       [%hall-action %phrase audience:hall (list speech:hall)]
   ==
 +$  card
-  $%  [%hiss wire [~ ~] %httr %hiss hiss:eyre]
+  $%  [%hiss wire (unit ~) %httr %hiss hiss:eyre]
       [%poke wire dock poke]
       [%rule wire %turf %put turf]
       [%wait wire @da]
@@ -416,12 +416,6 @@
 ::  +this: is sparta
 ::
 ++  this  .
-:: +request: generic http request
-::
-++  request
-  |=  [=wire =hiss:eyre]
-  ^-  card
-  [%hiss wire [~ ~] %httr %hiss hiss]
 ::  +notify: send :hall notification
 ::
 ++  notify
@@ -626,7 +620,12 @@
     |=  car=card
     ^+  this
     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
@@ -860,6 +859,12 @@
     |=  car=card
     ^+  this
     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

From 7375499d2b8ef1beeaabf6290168e77e9581cbcc Mon Sep 17 00:00:00 2001
From: Joe Bryan <joemfb@gmail.com>
Date: Sun, 13 Jan 2019 21:48:45 -0500
Subject: [PATCH 2/3] corrects (unit user) in :acme %hiss requests

---
 app/acme.hoon | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/app/acme.hoon b/app/acme.hoon
index 89c164f0b0..2d92245a15 100644
--- a/app/acme.hoon
+++ b/app/acme.hoon
@@ -140,7 +140,7 @@
 ::
 +=  card
   $%  [%flog wire flog:dill]
-      [%hiss wire [~ ~] %httr %hiss hiss:eyre]
+      [%hiss wire ~ %httr %hiss hiss:eyre]
       [%rule wire %cert (unit [wain wain])]
       [%wait wire @da]
       [%well wire path (unit mime)]
@@ -340,12 +340,12 @@
 ++  abet
   ^-  (quip move _this)
   [(flop mov) this(mov ~)]
-::  +request: generic http request
+::  +request: unauthenticated http request
 ::
 ++  request
   |=  [wir=wire req=hiss]
   ^-  card
-  [%hiss wir [~ ~] %httr %hiss req]
+  [%hiss wir ~ %httr %hiss req]
 ::  +signed-request: JWS JSON POST
 ::
 ++  signed-request
@@ -1228,4 +1228,3 @@
   ::
   ?.(=(act *acct) this init)
 --
-

From a9c59220c63e4603eb7f0a2de9957b782855de08 Mon Sep 17 00:00:00 2001
From: Joe Bryan <joemfb@gmail.com>
Date: Sun, 13 Jan 2019 22:16:57 -0500
Subject: [PATCH 3/3] fix %hiss request in :acme unit tests

---
 tests/app/acme.hoon | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/app/acme.hoon b/tests/app/acme.hoon
index 595876cd52..59a65691e7 100644
--- a/tests/app/acme.hoon
+++ b/tests/app/acme.hoon
@@ -44,6 +44,6 @@
     =-  (need (de-purl:html -))
     'https://acme-staging-v02.api.letsencrypt.org/directory'
   %+  expect-eq
-      !>  ~[[ost.bow.app [%hiss /acme/directory/~zod [~ ~] %httr %hiss url %get ~ ~]]]
+      !>  ~[[ost.bow.app [%hiss /acme/directory/~zod ~ %httr %hiss url %get ~ ~]]]
       !>  moves
 --