From 7e50755029f274f7ae9b0123b2323ed1a14645d0 Mon Sep 17 00:00:00 2001
From: Anton Dyudin <ohaitch@gmail.com>
Date: Wed, 23 Jul 2014 14:01:52 -0700
Subject: [PATCH 1/4] Restructured raws/rads:og for =^ result order, added
 /=pals= %ames .^

---
 arvo/ames.hoon | 4 ++++
 arvo/hoon.hoon | 4 ++--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/arvo/ames.hoon b/arvo/ames.hoon
index 4961cabc4..b022663ca 100644
--- a/arvo/ames.hoon
+++ b/arvo/ames.hoon
@@ -1775,6 +1775,10 @@
       ?~  gys  ~
       =+  zet=zest:(ho:(~(um am [now fox]) our) his)
       [~ ?:(=(%show i.tyl) >zet< zet)]
+    ?:  ?=([%pals ~] tyl)
+      ?.  =(our his)
+        ~
+      [~ pals:(~(um am [now fox]) our)]
     ?.  ?=([%life ~] tyl)
       =+  muc=$(tyl [%life ~])
       (perm our his ?~(muc 0 (,@ud u.muc)) tyl)
diff --git a/arvo/hoon.hoon b/arvo/hoon.hoon
index 3041cd25a..844ab9da1 100644
--- a/arvo/hoon.hoon
+++ b/arvo/hoon.hoon
@@ -5394,7 +5394,7 @@
   ++  rads                                              ::  random continuation
     |=  b=@
     =+  r=(rad b)
-    [+>.$(a (shas %og-s r)) r]
+    [r +>.$(a (shas %og-s r))]
   ++  raw                                               ::  random bits
     ~/  %raw
     |=  b=@  ^-  @
@@ -5411,7 +5411,7 @@
   ++  raws                                              ::  random bits continuation
     |=  b=@
     =+  r=(raw b)
-    [+>.$(a (shas %og-s r)) r]
+    [r +>.$(a (shas %og-s r))]
   --
 ++  shaz                                                ::  sha-512
   |=  ruz=@  ^-  @

From cde30313885507e7b36fcfe536ec74eda53fd58e Mon Sep 17 00:00:00 2001
From: Anton Dyudin <ohaitch@gmail.com>
Date: Wed, 23 Jul 2014 15:15:30 -0700
Subject: [PATCH 2/4] :begin ~ship ~ticket form

---
 main/bin/begin.hoon | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/main/bin/begin.hoon b/main/bin/begin.hoon
index 8bef13c0d..53fd53f25 100644
--- a/main/bin/begin.hoon
+++ b/main/bin/begin.hoon
@@ -4,7 +4,7 @@
 =>  .(-< `who=@p`-<)
 =>  .(+ =>(+ ^/===/lib/pony))
 |=  [est=time *]
-|=  arg=$|(~ [p=@p ~])
+|=  arg=$|(~ [p=@p q=$|(~ [p=@p ~])])
 =-  ^-  bowl
     ?^  arg  (fud p.arg)
     %+  pomp  ""
@@ -65,8 +65,10 @@
   %+  pomp  ""
   %+  pomp  "                  -- Bunting, _Chomei at Toyama_"
   %+  pogo  (pond ^:@/===doc%/warning/txt)
-  %+  (polo %text "Your ticket: ~" ~ ~)
-    fed:ag
+  =-  ?:  ?=([@ @ ~] arg)
+        (- ~ p.q.arg)
+      %+  (polo %text "Your ticket: ~" ~ ~)
+      fed:ag  -
   |=  [* tic=@p]
   %+  pogo  (pond ^:@/===doc%/entropy/txt)
   %+  (polo %pass "Entropy: " ~ ~)

From d4cd1cdb47df8d36e0928d275dcf2be64ede9970 Mon Sep 17 00:00:00 2001
From: Anton Dyudin <ohaitch@gmail.com>
Date: Wed, 23 Jul 2014 15:36:10 -0700
Subject: [PATCH 3/4] :update "merge method" clarification

---
 main/bin/update.hoon | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/main/bin/update.hoon b/main/bin/update.hoon
index 604c0e2b1..29634d292 100644
--- a/main/bin/update.hoon
+++ b/main/bin/update.hoon
@@ -14,8 +14,11 @@
         =+  lum=(~(auld ze est owr) gem who des sab)
         ?~  lum
           ^-  gift
-          :+  %la  %leaf
-          "{(trip des)} failed to apply, please rerun with a merge option"
+          :^  %la  %rose  [": " "" ""]
+          :~  
+            leaf/"{(trip des)} failed to apply, please rerun with a merge option"
+            (skol -:!>(_germ))
+          ==
         ?~  u.lum
           `gift`[%la %leaf "{(trip des)} is up to date"]
         `gift`[%ok des u.u.lum]

From 620cebadad70d2f7e340da77dfa523aef6e081ce Mon Sep 17 00:00:00 2001
From: John Dulin <dulinjd@gmail.com>
Date: Wed, 23 Jul 2014 19:05:15 -0700
Subject: [PATCH 4/4] Fixed stupid imaginary type in the asset protocol

---
 main/sys/asset/ref/gate.hoon | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/main/sys/asset/ref/gate.hoon b/main/sys/asset/ref/gate.hoon
index 04c429356..6b17dbb01 100644
--- a/main/sys/asset/ref/gate.hoon
+++ b/main/sys/asset/ref/gate.hoon
@@ -1 +1 @@
-,[p=ship q=guid]
+,[p=ship q=@uwK]