Fixed error in %glyph lowdown construction and improved its handling.

app/talk-agent.hoon

@@ -154,6 +154,8 @@
     ::
     |=  nek/_nak
     ^+  +>
+    ?:  =(nek nak)
+      +>
     =.  nak  nek
     =.  nik  %-  ~(gas by *(map (set partner) char))
              =-  (zing `(list (list {(set partner) char}))`-)

app/talk-guardian.hoon

@@ -279,11 +279,9 @@
       (strap her ?~(hand.q.dup ~ `q.dup))
     ::
     $bind                                               ::x  set glyph binding.
-      %.  [%glyph nak]
-      %=  ra-inform
-        nik  (~(put by nik) q.dup p.dup)
-        nak  (~(put ju nak) p.dup q.dup)
-      ==
+      =.  nik  (~(put by nik) q.dup p.dup)
+      =.  nak  (~(put ju nak) p.dup q.dup)
+      (ra-inform %glyph nak)
     ==
   ::
   ++  ra-config                                         ::  configure story