X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fdup_eph.pl;fp=cmd%2Fshow%2Fdup_eph.pl;h=c8abccc1f24c64e925b4f850ac5c7c5a53761626;hb=55f3823f3ad86d76e1e995b0f255f1804684de18;hp=0000000000000000000000000000000000000000;hpb=57edbd136b2ca7b203c0ddfb46efc328961cd2be;p=spider.git

diff --git a/cmd/show/dup_eph.pl b/cmd/show/dup_eph.pl
new file mode 100644
index 00000000..c8abccc1
--- /dev/null
+++ b/cmd/show/dup_eph.pl
@@ -0,0 +1,12 @@
+#
+# show a list of all the outstanding announce dups
+# for debugging really
+#
+# Copyright (c) 2000 Dirk Koopman G1TLH
+#
+# $Id$
+#
+my $self = shift;
+my $line = shift;
+return (1, $self->msg('e5')) unless $self->priv >= 9; 
+return (1, DXProt::eph_list $line);