From 429df73cb313f2e6dae6894c6df6f3b30a392060 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 6 Mar 2003 13:59:19 +0000 Subject: don't create xxx.conf for standard devfs compatibility names --- perl-install/any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl-install/any.pm b/perl-install/any.pm index 288ce6917..6554d64f5 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -785,7 +785,7 @@ UNREGISTER ^$devfs_if\$ CFUNCTION GLOBAL unlink $of output_p("$::prefix/etc/devfs/conf.d/$if.conf", "REGISTER ^$devfs_if\$ CFUNCTION GLOBAL mksymlink $devfs_if $if UNREGISTER ^$devfs_if\$ CFUNCTION GLOBAL unlink $if -") if $devfs_if ne $if; +") if $devfs_if ne $if && $if !~ /^hd[a-z]/ && $if !~ /^scd/ && $if !~ /^sd[a-z]/; #- when creating a symlink on the system, use devfs name if devfs is mounted symlinkf($devfs_if, "$::prefix/dev/$if") if $devfs_if ne $if && detect_devices::dev_is_devfs(); -- cgit v1.2.1