1 files changed, 6 insertions, 3 deletions
diff --git a/perl-install/network/adsl.pm b/perl-install/network/adsl.pm
index 7af9bef50..01259b66e 100644
--- a/perl-install/network/adsl.pm
+++ b/perl-install/network/adsl.pm
@@ -104,10 +104,13 @@ sub sagem_set_parameters {
             s/STATIC_IP=.*\n//;
             s!</eaglectrl>!STATIC_IP=$netc->{static_ip}\n</eaglectrl>! if $netc->{static_ip};
         } "$::prefix$cfg_file";
+    }
+    #- create CMV symlinks for both POTS and ISDN lines
+    foreach my $type (qw(p i)) {
         my $cmv;
-        $cmv = "$::prefix/etc/eagle-usb/CMVep$netc->{provider_id}.txt" if $netc->{provider_id};
-        -f $cmv or $cmv = "$::prefix/etc/eagle-usb/CMVepWO.txt";
-        symlink("$::prefix/etc/eagle-usb/CMVep.txt", $cmv);
+        $cmv = "$::prefix/etc/eagle-usb/CMVe${type}$netc->{provider_id}.txt" if $netc->{provider_id};
+        -f $cmv or $cmv = "$::prefix/etc/eagle-usb/CMVe${type}WO.txt";
+        symlink("$::prefix/etc/eagle-usb/CMVe${type}.txt", $cmv);
     }
 }