From fa583f75b6979288c03962354a9be1fdff6a30ad Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sat, 19 Feb 2005 22:32:13 +0000
Subject: [PATCH] fix eph_dup

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

diff --git a/perl/Aranea.pm b/perl/Aranea.pm
index ed1c99cd..30816020 100644
--- a/perl/Aranea.pm
+++ b/perl/Aranea.pm
@@ -157,7 +157,7 @@ sub disconnect
 	$thing->process($self);
 
 	# get rid of any PC16/17/19
-	eph_del_regex("^PC1[679]*$call");
+	DXProt::eph_del_regex("^PC1[679]*$call");
 
 	# do routing stuff, remove me from routing table
 	my $node = Route::Node::get($call);
@@ -168,7 +168,7 @@ sub disconnect
 		# and all my ephemera as well
 		for (@rout) {
 			my $c = $_->call;
-			eph_del_regex("^PC1[679].*$c");
+			DXProt::eph_del_regex("^PC1[679].*$c");
 		}
 	}
 
-- 
2.43.0