From e5aec54571dbeb117ec8701e87ee9353bf67e1b9 Mon Sep 17 00:00:00 2001 From: Fang Date: Wed, 18 Apr 2018 23:18:17 +0200 Subject: [PATCH] Fix hull diff generation and application. --- lib/constitution.hoon | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/lib/constitution.hoon b/lib/constitution.hoon index 6e3e9052cc..8c97f4b09f 100644 --- a/lib/constitution.hoon +++ b/lib/constitution.hoon @@ -17,10 +17,12 @@ ?: =(event.log activated) =+ ^- [who=@ wer=address] (decode-results data.log ~[%uint %address]) - :~ ^- (pair ship diff-hull) + :* ^- (pair ship diff-hull) :+ who %full %*(. *hull owner wer, sponsor (sein:title who)) :: + ?: =(%czar (clan:title who)) ~ + :_ ~ ^- (pair ship diff-hull) [(sein:title who) %spawned who] == @@ -69,7 +71,11 @@ %owner hul(owner new.dif) %spawned =+ (~(put in spawned.hul) who.dif) hul(spawn-count +(spawn-count.hul), spawned -) - %keys hul(encryption-key enc.dif, authentication-key aut.dif) + %keys %_ hul + encryption-key enc.dif + authentication-key aut.dif + key-revision rev.dif + == %sponsor hul(sponsor new.dif, escape ~) %escape hul(escape new.dif) %spawn-proxy hul(spawn-proxy new.dif)