diff options
author | kay.sievers@vrfy.org <kay.sievers@vrfy.org> | 2004-03-12 18:18:58 -0800 |
---|---|---|
committer | Greg KH <gregkh@suse.de> | 2005-04-26 21:35:10 -0700 |
commit | c013b034ae54af68e64c0b46cd09cbe3564a7b8a (patch) | |
tree | 867da5751434d31a6f246ebd3ea1c2e7c2e42b19 /test | |
parent | 7d12d4e175eececfc6956e99438f7c1ddd6b85eb (diff) |
[PATCH] udev-test.pl cleanup
Here is a small name change, so all expected values are named exp_*
Diffstat (limited to 'test')
-rw-r--r-- | test/udev-test.pl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/test/udev-test.pl b/test/udev-test.pl index 0f623be0d3..d93ebb9cc3 100644 --- a/test/udev-test.pl +++ b/test/udev-test.pl @@ -36,7 +36,7 @@ my @tests = ( desc => "label test of scsi disc", subsys => "block", devpath => "block/sda", - exp_name=> "boot_disk" , + exp_name => "boot_disk" , conf => <<EOF BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="boot_disk%n" KERNEL="ttyUSB0", NAME="visor" @@ -46,7 +46,7 @@ EOF desc => "label test of scsi partition", subsys => "block", devpath => "block/sda/sda1", - exp_name=> "boot_disk1" , + exp_name => "boot_disk1" , conf => <<EOF BUS="scsi", SYSFS{vendor}="IBM-ESXS", NAME="boot_disk%n" EOF @@ -55,7 +55,7 @@ EOF desc => "label test of pattern match", subsys => "block", devpath => "block/sda/sda1", - exp_name=> "boot_disk1" , + exp_name => "boot_disk1" , conf => <<EOF BUS="scsi", SYSFS{vendor}="?IBM-ESXS", NAME="boot_disk%n-1" BUS="scsi", SYSFS{vendor}="IBM-ESXS?", NAME="boot_disk%n-2" @@ -529,7 +529,7 @@ EOF subsys => "block", devpath => "block/sda", exp_name => "node", - perms => "5000::0444", + exp_perms => "5000::0444", conf => <<EOF BUS="scsi", KERNEL="sda", NAME="node", OWNER="5000", MODE="0444" EOF @@ -610,9 +610,9 @@ sub run_test { my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev, $size, $atime, $mtime, $ctime, $blksize, $blocks) = stat("$PWD/$udev_root$config->{exp_name}"); - if (defined($config->{perms})) { + if (defined($config->{exp_perms})) { my $wrong = 0; - $config->{perms} =~ m/^(.*):(.*):(.*)$/; + $config->{exp_perms} =~ m/^(.*):(.*):(.*)$/; if ($1 ne "") { if ($uid != $1) { $wrong = 1; }; } |