From 2af6cce23d91c175f9fe9a5b4f7af6f8cfd43440 Mon Sep 17 00:00:00 2001
From: djk <djk>
Date: Tue, 29 Jun 1999 21:01:45 +0000
Subject: [PATCH] changed some stop_msg calls in DXProt to $call

---
 perl/DXProt.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 78e0e0d1..a28be5ff 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -421,7 +421,7 @@ sub normal
 				
 				# unbusy and stop and outgoing mail (ie if somehow we receive another PC19 without a disconnect)
 				my $mref = DXMsg::get_busy($call);
-				$mref->stop_msg($self) if $mref;
+				$mref->stop_msg($call) if $mref;
 				
 				# add this station to the user database, if required (don't remove SSID from nodes)
 				my $user = DXUser->get_current($call);
@@ -772,7 +772,7 @@ sub finish
 	
 	# unbusy and stop and outgoing mail
 	my $mref = DXMsg::get_busy($call);
-	$mref->stop_msg($self) if $mref;
+	$mref->stop_msg($call) if $mref;
 	
 	# broadcast to all other nodes that all the nodes connected to via me are gone
 	my @gonenodes = map { $_->dxchan == $self ? $_ : () } DXNode::get_all();
-- 
2.34.1