get to a reasonably stable stage in the route info exchange.

[spider.git] / perl / Thingy / Bye.pm

diff --git a/perl/Thingy/Bye.pm b/perl/Thingy/Bye.pm
index 6d75b618e2832befe2cf4c58088964953266a890..ad8059c69cacfe1d0b481528821f3987dcf3373e 100644 (file)
--- a/perl/Thingy/Bye.pm
+++ b/perl/Thingy/Bye.pm
@@ -1,6 +1,9 @@
 #
 # Bye Thingy handling
 #
+# Note that this is a generator of pc21n and pc17n/pc17u
+# and a consumer of fpc21n and fpc21n
+#
 # $Id$
 #
 # Copyright (c) 2005 Dirk Koopman G1TLH
@@ -55,8 +58,8 @@ sub handle
                                @pc21 = $parent->del($uref);
                        } else {
                                $parent->del_user($uref);
-                               $thing->{pc17n} = $thing->{origin};
-                               $thing->{pc17u} = $user;
+                               $thing->{pc17n} = $parent;
+                               $thing->{pc17u} = [$uref];
                        }
                }
        } else {