diff options
| author | Romain d'Alverny <rda@mageia.org> | 2011-12-13 15:57:09 +0000 |
|---|---|---|
| committer | Romain d'Alverny <rda@mageia.org> | 2011-12-13 15:57:09 +0000 |
| commit | e2fd604da5cda3ce2e29cda4c5813996c135cf12 (patch) | |
| tree | d0e63c3c0a2b79680531a17eba55b5f8c3ab2677 | |
| parent | 1f2ca24bf78e6355cd76ec078954af99466a24de (diff) | |
| download | isocheck-e2fd604da5cda3ce2e29cda4c5813996c135cf12.tar isocheck-e2fd604da5cda3ce2e29cda4c5813996c135cf12.tar.gz isocheck-e2fd604da5cda3ce2e29cda4c5813996c135cf12.tar.bz2 isocheck-e2fd604da5cda3ce2e29cda4c5813996c135cf12.tar.xz isocheck-e2fd604da5cda3ce2e29cda4c5813996c135cf12.zip | |
glob list files in alphabetical order; glob_ does not
| -rw-r--r-- | test_iso.pl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test_iso.pl b/test_iso.pl index 21a15f7..c9863ae 100644 --- a/test_iso.pl +++ b/test_iso.pl @@ -53,16 +53,16 @@ print "# Host\t\t: ", `uname -n`; my $aggregator = TAP::Parser::Aggregator->new; $aggregator->start; -$harness->aggregate_tests($aggregator, glob_('t/*.t')); +$harness->aggregate_tests($aggregator, glob('t/*.t')); my $name = basename($image_path); my %info = Tools::parse_mageia_iso_name($name); my @testfiles; if ($info{variant} =~ /^LiveCD/) { - @testfiles = glob_('t_live_iso/*.t'); + @testfiles = glob('t_live_iso/*.t'); } else { - @testfiles = glob_('t_install_iso/*.t'); + @testfiles = glob('t_install_iso/*.t'); } if (@testfiles) { @@ -73,7 +73,7 @@ if (@testfiles) { $harness->aggregate_tests($aggregator, @testfiles); print "# Umounting ISO\n"; - system 'umount -l /media/iso_check'; + system('umount -l', '/media/iso_check'); rmdir('/media/iso_check'); } |