X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FThingy%2FBye.pm;h=ad8059c69cacfe1d0b481528821f3987dcf3373e;hb=4f2b8661933ee3e3ccda2596d30485d98dd18ecb;hp=6d75b618e2832befe2cf4c58088964953266a890;hpb=d737a53dd9247a0b3c57852dd605047d241beb47;p=spider.git

diff --git a/perl/Thingy/Bye.pm b/perl/Thingy/Bye.pm
index 6d75b618..ad8059c6 100644
--- 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 {