From 845696a3a6a4f08be7b420f022b085dd6cf79df2 Mon Sep 17 00:00:00 2001 From: Ted Blackman Date: Wed, 3 Jan 2018 16:37:44 -0800 Subject: [PATCH] Fix Clay %next revision adapted from commit 852997ac16a751c69775489c61ae8e5b650c9a50 --- sys/vane/clay.hoon | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/sys/vane/clay.hoon b/sys/vane/clay.hoon index 7f70fe7496..b79b86b28e 100644 --- a/sys/vane/clay.hoon +++ b/sys/vane/clay.hoon @@ -1683,15 +1683,16 @@ ?~ u.ver $(xiq t.xiq, ..wake (blub-all q.i.xiq ~)) $(xiq t.xiq, xaq [i.xiq(q.p u.ver) xaq]) - =+ var=(aver mun(q [%ud let.dom])) + =/ muc mun(q [%ud let.dom]) :: current mood + =+ var=(aver muc) ?~ var - ~& [%oh-noes mood=mun letdom=let.dom] + ~& [%oh-noes old=mun mood=muc letdom=let.dom] $(xiq t.xiq) ?~ u.var - $(xiq t.xiq, ..wake (blab-all q.i.xiq mun %& %null [%atom %n ~] ~)) + $(xiq t.xiq, ..wake (blab-all q.i.xiq muc %& %null [%atom %n ~] ~)) ?: (equivalent-data:ze u.q.p.i.xiq u.u.var) $(xiq t.xiq, xaq [i.xiq xaq]) - $(xiq t.xiq, ..wake (blab-all q.i.xiq mun u.u.var)) + $(xiq t.xiq, ..wake (blab-all q.i.xiq muc u.u.var)) :: $many =+ mot=`moat`q.p.i.xiq