summaryrefslogtreecommitdiffstats
path: root/perl-install/modules
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/modules')
-rw-r--r--perl-install/modules/any_conf.pm12
-rw-r--r--perl-install/modules/interactive.pm2
-rw-r--r--perl-install/modules/modprobe_conf.pm2
-rw-r--r--perl-install/modules/modules_conf.pm2
-rw-r--r--perl-install/modules/parameters.pm2
5 files changed, 6 insertions, 14 deletions
diff --git a/perl-install/modules/any_conf.pm b/perl-install/modules/any_conf.pm
index 3873955b3..c235e84f4 100644
--- a/perl-install/modules/any_conf.pm
+++ b/perl-install/modules/any_conf.pm
@@ -1,4 +1,4 @@
-package modules::any_conf; # $Id: any_conf.pm 215411 2007-04-25 12:26:16Z pixel $
+package modules::any_conf;
use log;
use common;
@@ -139,10 +139,7 @@ sub write {
#- Substitute new config (if config has changed)
substInFile {
my ($type, $module, $val) = split(' ', chomp_($_), 3);
- if ($type eq 'post-install' && $module eq 'supermount') {
- #- remove the post-install supermount stuff.
- $_ = '';
- } elsif (member($type, $conf->handled_fields)) {
+ if (member($type, $conf->handled_fields)) {
my $new_val = $conf->{$module}{$type};
if (!$new_val) {
$_ = '';
@@ -203,11 +200,6 @@ sub read_raw {
s/#.*$//;
s/\s+$//;
- # Fix upgrade from ALSA < 0.9.0:
- s/\b(snd-card-)/snd-/g;
- # Fix upgrade for unified VIA driver:
- s/\b(snd-via686|snd-via8233)\b/snd-via82xx/g;
-
my ($type, $module, $val) = split(' ', $_, 3) or next;
$c{$module}{$type} = $val;
diff --git a/perl-install/modules/interactive.pm b/perl-install/modules/interactive.pm
index b6b500fc1..dae135889 100644
--- a/perl-install/modules/interactive.pm
+++ b/perl-install/modules/interactive.pm
@@ -1,4 +1,4 @@
-package modules::interactive; # $Id: interactive.pm 253241 2009-02-25 09:28:44Z tv $
+package modules::interactive;
use modules;
use common;
diff --git a/perl-install/modules/modprobe_conf.pm b/perl-install/modules/modprobe_conf.pm
index c9ad3ff5c..7989096f8 100644
--- a/perl-install/modules/modprobe_conf.pm
+++ b/perl-install/modules/modprobe_conf.pm
@@ -1,4 +1,4 @@
-package modules::modprobe_conf; # $Id: modprobe_conf.pm 259199 2009-08-13 10:18:59Z pterjan $
+package modules::modprobe_conf;
use log;
use common;
diff --git a/perl-install/modules/modules_conf.pm b/perl-install/modules/modules_conf.pm
index 5a6242ff5..be4b8fca4 100644
--- a/perl-install/modules/modules_conf.pm
+++ b/perl-install/modules/modules_conf.pm
@@ -1,4 +1,4 @@
-package modules::modules_conf; # $Id: modules_conf.pm 228209 2007-09-16 23:09:00Z blino $
+package modules::modules_conf;
use log;
use common;
diff --git a/perl-install/modules/parameters.pm b/perl-install/modules/parameters.pm
index 6f77bad79..36990b5d1 100644
--- a/perl-install/modules/parameters.pm
+++ b/perl-install/modules/parameters.pm
@@ -1,4 +1,4 @@
-package modules::parameters; # $Id: parameters.pm 215411 2007-04-25 12:26:16Z pixel $
+package modules::parameters;
use diagnostics;
use strict;