From 24550808f9ee4ba5cf6a720bb364977f7ed586af Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Wed, 3 Jan 2007 21:45:08 +0000
Subject: [PATCH] get pc92 transfer call correct (ie don't change it)

---
 perl/DXProtHandle.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/DXProtHandle.pm b/perl/DXProtHandle.pm
index d63b6e00..d8bb6ac8 100644
--- a/perl/DXProtHandle.pm
+++ b/perl/DXProtHandle.pm
@@ -1411,7 +1411,7 @@ sub handle_92
 		return;
 	}
 
-	$self->broadcast_route_pc9x($origin, undef, $line, 0);
+	$self->broadcast_route_pc9x($pcall, undef, $line, 0);
 	foreach my $r (@rdel) {
 		next unless $r;
 		
-- 
2.34.1