svn commit: samba r22378 - in branches/SAMBA_4_0/source/script/tests: .

Author: metze
Date: 2007-04-19 15:05:59 +0000 (Thu, 19 Apr 2007)
New Revision: 22378

WebSVN: 
http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=22378

Log:
none needs to be checked first

metze
Modified:
   branches/SAMBA_4_0/source/script/tests/selftest.pl


Changeset:
Modified: branches/SAMBA_4_0/source/script/tests/selftest.pl
===================================================================
--- branches/SAMBA_4_0/source/script/tests/selftest.pl  2007-04-19 15:03:35 UTC 
(rev 22377)
+++ branches/SAMBA_4_0/source/script/tests/selftest.pl  2007-04-19 15:05:59 UTC 
(rev 22378)
@@ -677,13 +677,13 @@
        my ($envname) = @_;
 
        my $testenv_vars;
-       if (defined($running_envs{$envname})) {
+       if ($envname eq "none") {
+               $testenv_vars = {};
+       } elsif (defined($running_envs{$envname})) {
                $testenv_vars = $running_envs{$envname};
                if (not $target->check_env($testenv_vars)) {
                        $testenv_vars = undef;
                }
-       } elsif ($envname eq "none") {
-               $testenv_vars = {};
        } else {
                $testenv_vars = $target->setup_env($envname, $prefix);
        }