From ece0b001419b8e755540eaff4ce3a558fd7d939f Mon Sep 17 00:00:00 2001 From: minima Date: Sun, 19 Aug 2001 17:32:53 +0000 Subject: [PATCH] fix typo --- perl/DXProt.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 9e1f7c6f..ed8d2e5b 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -906,7 +906,7 @@ sub normal if ($pcno == 39) { # incoming disconnect if ($field[1] eq $self->{call}) { $self->disconnect(1); - eph_dup_regex("^PC(?:1[679]|21).*$field[1]"); + eph_del_regex("^PC(?:1[679]|21).*$field[1]"); } else { dbg("PCPROT: came in on wrong channel") if isdbg('chanerr'); } -- 2.43.0