initial commit of file from CVS for e-smith-base on Thu 26 Oct 11:24:52 BST 2023
This commit is contained in:
@@ -0,0 +1,20 @@
|
||||
{
|
||||
my %changes = (
|
||||
rtl8139 => "8139too",
|
||||
old_tulip => "tulip",
|
||||
);
|
||||
foreach my $n (qw (1 2 ))
|
||||
{
|
||||
my $driver = $DB->get("EthernetDriver$n");
|
||||
if (defined $driver)
|
||||
{
|
||||
foreach my $old (keys %changes)
|
||||
{
|
||||
if ($driver->prop('type') eq $old)
|
||||
{
|
||||
$driver->merge_props(type => $changes{$old});
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user