equal
deleted
inserted
replaced
39 # the file fails at any point. This will also happen if the file is the wrong |
39 # the file fails at any point. This will also happen if the file is the wrong |
40 # size. |
40 # size. |
41 # |
41 # |
42 $fmc->LoadUp($datfile) or die "Failed to load up data from '$datfile'\n"; |
42 $fmc->LoadUp($datfile) or die "Failed to load up data from '$datfile'\n"; |
43 |
43 |
44 # |
44 # Setup an array of all the features we need to switch on. |
45 # Device supports GSM cellular stack. |
|
46 # const TInt KFeatureIdProtocolGsm = 81; |
|
47 # |
|
48 # Device supports WCDMA cellular stack |
|
49 # const TInt KFeatureIdProtocolWcdma = 82; |
|
50 # |
|
51 # KFeatureIdOnScreenDialer 1696 |
|
52 # |
|
53 my $ffuid; |
45 my $ffuid; |
54 my $ff; |
46 my $ff; |
55 my @tomtab; |
47 my @tomtab; |
56 |
48 |
57 $tomtab[0] = 81; |
49 $tomtab[0] = 81; # KFeatureIdProtocolGsm |
58 $tomtab[1] = 82; |
50 $tomtab[1] = 82; # KFeatureIdProtocolWcdma |
59 $tomtab[1] = 1696; |
51 $tomtab[1] = 1696; # KFeatureIdOnScreenDialer |
60 |
52 |
61 foreach $ffuid (@tomtab) |
53 foreach $ffuid (@tomtab) |
62 #for ($ffuid = 1696; $ffuid <= 1696; $ffuid++) |
54 #for ($ffuid = 1696; $ffuid <= 1696; $ffuid++) |
63 { |
55 { |
64 $ff = $fmc->GetFeatureFlagByUID($ffuid); |
56 $ff = $fmc->GetFeatureFlagByUID($ffuid); |