diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-05-17 11:17:40 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-05-17 11:17:40 +0000 |
| commit | 5d5553a28eb9b061f697fc27387a092445ad3f41 (patch) | |
| tree | c487c24fd916ca8a617fe395a0c5db3692491979 | |
| parent | f3016193e848a8d99a996b667fed4cec36588772 (diff) | |
| download | drakx-net-5d5553a28eb9b061f697fc27387a092445ad3f41.tar drakx-net-5d5553a28eb9b061f697fc27387a092445ad3f41.tar.gz drakx-net-5d5553a28eb9b061f697fc27387a092445ad3f41.tar.bz2 drakx-net-5d5553a28eb9b061f697fc27387a092445ad3f41.tar.xz drakx-net-5d5553a28eb9b061f697fc27387a092445ad3f41.zip | |
cosmetics
| -rw-r--r-- | lib/network/connection/cellular_card.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/network/connection/cellular_card.pm b/lib/network/connection/cellular_card.pm index 6221bc1..96480b2 100644 --- a/lib/network/connection/cellular_card.pm +++ b/lib/network/connection/cellular_card.pm @@ -64,7 +64,7 @@ sub check_hardware_is_slow() { 1 } sub get_networks { my ($self) = @_; - my $cmd = "comgt -d " . $self->get_tty_device; + my $cmd = 'comgt -d ' . $self->get_tty_device; my ($network, $state) = `$cmd reg` =~ /^Registered on \w+ network: "(.*)",(\d+)$/m; my ($strength) = `$cmd sig` =~ /^Signal Quality:\s+(\d+),\d+$/; $self->{networks} = $network && { @@ -171,7 +171,7 @@ sub check_hardware { require c; use POSIX qw(:errno_h); - my $pid = IPC::Open2::open2(my $cmd_out, my $cmd_in, "comgt", "-d", $self->get_tty_device); + my $pid = IPC::Open2::open2(my $cmd_out, my $cmd_in, 'comgt', '-d', $self->get_tty_device); common::nonblock($cmd_out); my $selector = IO::Select->new($cmd_out); my $already_entered_pin; |