From 20e7229a7664a938d5f11e27942b727fb22e51ad Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 15 May 2008 22:05:12 +0000 Subject: factorize in network::connection::cellular --- lib/network/connection/cellular.pm | 6 ++++++ lib/network/connection/cellular_bluetooth.pm | 1 - lib/network/connection/cellular_card.pm | 1 - 3 files changed, 6 insertions(+), 2 deletions(-) (limited to 'lib') diff --git a/lib/network/connection/cellular.pm b/lib/network/connection/cellular.pm index 8a4d0ee..5ecd2f8 100644 --- a/lib/network/connection/cellular.pm +++ b/lib/network/connection/cellular.pm @@ -50,4 +50,10 @@ sub get_access_settings { ]; } +sub write_settings { + my ($self) = @_; + $self->write_cellular_settings; + $self->SUPER::write_settings; +} + 1; diff --git a/lib/network/connection/cellular_bluetooth.pm b/lib/network/connection/cellular_bluetooth.pm index 80c6cb4..77bf964 100644 --- a/lib/network/connection/cellular_bluetooth.pm +++ b/lib/network/connection/cellular_bluetooth.pm @@ -87,7 +87,6 @@ rfcomm$dev { $self->{access}{at_commands} = [ qq(AT+CGDCONT=$cid,"IP","$self->{access}{apn}") ]; $self->{access}{dial_number} = "*99***$cid#"; - $self->write_cellular_settings; $self->SUPER::write_settings; } diff --git a/lib/network/connection/cellular_card.pm b/lib/network/connection/cellular_card.pm index 2253a5d..cd51f8a 100644 --- a/lib/network/connection/cellular_card.pm +++ b/lib/network/connection/cellular_card.pm @@ -125,7 +125,6 @@ sub write_settings { ]; $self->{access}{dial_number} = "*99***$cid#"; - $self->write_cellular_settings; $self->SUPER::write_settings; } -- cgit v1.2.1