X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=perl%2FAmanda%2FDevice.pm;fp=perl%2FAmanda%2FDevice.pm;h=129d5c04a1a983a049ef8ddf068ee5f9951fd90d;hb=d28952249e392eb31bc8eecc53f6c477f30c617b;hp=e6b49c87a9429117f37a71cbcd25a9428d06a6ac;hpb=949b8910a5e23c4285d0b1aedacfc82a14dc97a5;p=debian%2Famanda

diff --git a/perl/Amanda/Device.pm b/perl/Amanda/Device.pm
index e6b49c8..129d5c0 100644
--- a/perl/Amanda/Device.pm
+++ b/perl/Amanda/Device.pm
@@ -137,13 +137,7 @@ sub DESTROY {
 *eject = *Amanda::Devicec::Device_eject;
 *directtcp_supported = *Amanda::Devicec::Device_directtcp_supported;
 *listen = *Amanda::Devicec::Device_listen;
-*accept = *Amanda::Devicec::Device_accept;
-*accept_with_cond = *Amanda::Devicec::Device_accept_with_cond;
-*connect = *Amanda::Devicec::Device_connect;
-*connect_with_cond = *Amanda::Devicec::Device_connect_with_cond;
 *use_connection = *Amanda::Devicec::Device_use_connection;
-*write_from_connection = *Amanda::Devicec::Device_write_from_connection;
-*read_to_connection = *Amanda::Devicec::Device_read_to_connection;
 *property_list = *Amanda::Devicec::Device_property_list;
 *property_get = *Amanda::Devicec::Device_property_get;
 *property_set = *Amanda::Devicec::Device_property_set;