diff options
author | Olivier Blin <oblin@mandriva.com> | 2008-05-15 22:14:15 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.com> | 2008-05-15 22:14:15 +0000 |
commit | 0bcedcfde59e8a9114e9c360ff1ec7e8b5d98698 (patch) | |
tree | 27878010d60a53e6656cb5f2511ce7b8ee9ccf54 /lib | |
parent | ec987949cb05f01906983fe1a4cafea0c9dec85d (diff) | |
download | drakx-net-0bcedcfde59e8a9114e9c360ff1ec7e8b5d98698.tar drakx-net-0bcedcfde59e8a9114e9c360ff1ec7e8b5d98698.tar.gz drakx-net-0bcedcfde59e8a9114e9c360ff1ec7e8b5d98698.tar.bz2 drakx-net-0bcedcfde59e8a9114e9c360ff1ec7e8b5d98698.tar.xz drakx-net-0bcedcfde59e8a9114e9c360ff1ec7e8b5d98698.zip |
keep context id in self
Diffstat (limited to 'lib')
-rw-r--r-- | lib/network/connection/cellular_bluetooth.pm | 6 | ||||
-rw-r--r-- | lib/network/connection/cellular_card.pm | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/lib/network/connection/cellular_bluetooth.pm b/lib/network/connection/cellular_bluetooth.pm index 0f89b2c..3adee03 100644 --- a/lib/network/connection/cellular_bluetooth.pm +++ b/lib/network/connection/cellular_bluetooth.pm @@ -73,9 +73,9 @@ sub search_services { sub set_ppp_settings { my ($self) = @_; - my $cid = 1; - $self->{access}{at_commands} = [ qq(AT+CGDCONT=$cid,"IP","$self->{access}{apn}") ]; - $self->{access}{dial_number} = "*99***$cid#"; + $self->{access}{cid} = 1; + $self->{access}{at_commands} = [ qq(AT+CGDCONT=$self->{access}{cid},"IP","$self->{access}{apn}") ]; + $self->{access}{dial_number} = "*99***$self->{access}{cid}#"; } sub write_settings { diff --git a/lib/network/connection/cellular_card.pm b/lib/network/connection/cellular_card.pm index 4d7c1f5..c349c90 100644 --- a/lib/network/connection/cellular_card.pm +++ b/lib/network/connection/cellular_card.pm @@ -106,18 +106,18 @@ sub build_peer { sub set_ppp_settings { my ($self) = @_; - my $cid = 3; + $self->{access}{cid} = 3; $self->{access}{at_commands} = [ "AT+CPIN?", # Set +CGEE to 2 "AT+CMEE=2", - qq(AT+CGDCONT=$cid,"IP","$self->{access}{apn}"), + qq(AT+CGDCONT=$self->{access}{cid},"IP","$self->{access}{apn}"), # Setup +CGEQREG (QoS, don't set it for now) # qq(AT+CGEQREQ=3,3,64,384,0,0,2,0,"0E0","0E0",3,0,0), # Attached to network, will return 1 "AT+CGATT?", ]; - $self->{access}{dial_number} = "*99***$cid#"; + $self->{access}{dial_number} = "*99***$self->{access}{cid}#"; } sub write_settings { |