No reannouncing self

Signed-off-by: Rahix <rahix@rahix.de>

bc.lua

@@ -147,14 +147,17 @@ function BaseControl:finalize(waits, timeout)
     self = BaseControl:new()
   end
 
-  -- Announce own nouns and verbs
+  -- Announce own nouns and verbs if this is the first
-  local nouns, verbs = self:nouns(true), self:verbs(true)
+  -- call to finalize() and we have registered names
-  if #nouns > 0 or #verbs > 0 then
+  if not self.live then
-    self.network:broadcast{
+    local nouns, verbs = self:nouns(true), self:verbs(true)
-      ty=Message.Register,
+    if #nouns > 0 or #verbs > 0 then
-      nouns=nouns,
+      self.network:broadcast{
-      verbs=verbs,
+        ty=Message.Register,
-    }
+        nouns=nouns,
+        verbs=verbs,
+      }
+    end
   end
 
   if #(waits or {}) ~= 0 then