authenticator dynamic modules

[exim.git] / test / runtest

diff --git a/test/runtest b/test/runtest
index 2922335511654bc68864ddb9a7efe6c3e48d5375..0c9f2808b94432f4a3ab636107edf79236ceeb01 100755 (executable)
--- a/test/runtest
+++ b/test/runtest
@@ -1160,11 +1160,11 @@ RESET_AFTER_EXTRA_LINE_READ:
                (?: .*\sBerkeley\ DB
                  | \sProbably\ (?:Berkeley\ DB|ndbm|GDBM)
                  | \sUsing\ (?:tdb|sqlite3)
                (?: .*\sBerkeley\ DB
                  | \sProbably\ (?:Berkeley\ DB|ndbm|GDBM)
                  | \sUsing\ (?:tdb|sqlite3)

-                 | Authenticators:
+                 | Authenticators\ \((?:built-in|dynamic)\):

                  | Lookups(?:\(built-in\))?:
                  | Support\ for:
                  | Routers\ \((?:built-in|dynamic)\):
                  | Lookups(?:\(built-in\))?:
                  | Support\ for:
                  | Routers\ \((?:built-in|dynamic)\):

-                 | Transports:
+                 | Transports\ \((?:built-in|dynamic)\):

                  | Malware:
                  | log\ selectors\ =
                  | cwd=
                  | Malware:
                  | log\ selectors\ =
                  | cwd=


@@ -3741,12 +3741,13 @@ while (<EXIMINFO>)
     @parm_lookups{keys %temp_lookups} = values %temp_lookups;
     }
 
     @parm_lookups{keys %temp_lookups} = values %temp_lookups;
     }
 

-  elsif (/^Authenticators: (.*)/)
+  elsif (/^Authenticators \((?:built-in|dynamic)\):  ?(.*)/)

     {
     print;
     @temp = split /(\s+)/, $1;
     push(@temp, ' ');
     {
     print;
     @temp = split /(\s+)/, $1;
     push(@temp, ' ');

-    %parm_authenticators = @temp;
+    my %temp_auths= @temp;
+    @parm_authenticators{keys %temp_auths} = values %temp_auths;

     }
 
   elsif (/^Routers \((?:built-in|dynamic)\):  ?(.*)/)
     }
 
   elsif (/^Routers \((?:built-in|dynamic)\):  ?(.*)/)


@@ -3754,7 +3755,7 @@ while (<EXIMINFO>)
     print;
     @temp = split /(\s+)/, $1;
     push(@temp, ' ');
     print;
     @temp = split /(\s+)/, $1;
     push(@temp, ' ');

-    my %temp_routers= @temp;
+    my %temp_routers = @temp;

     @parm_routers{keys %temp_routers} = values %temp_routers;
     }
 
     @parm_routers{keys %temp_routers} = values %temp_routers;
     }
 


@@ -3762,13 +3763,15 @@ while (<EXIMINFO>)
   # that the basic transport name is set, and then the name with each of the
   # options.
 
   # that the basic transport name is set, and then the name with each of the
   # options.
 

-  elsif (/^Transports: (.*)/)
+  elsif (/^Transports \((?:built-in|dynamic)\): (.*)/)

     {
     print;
     @temp = split /(\s+)/, $1;
     my($i,$k);
     push(@temp, ' ');
     {
     print;
     @temp = split /(\s+)/, $1;
     my($i,$k);
     push(@temp, ' ');

-    %parm_transports = @temp;
+    my %temp_transports = @temp;
+    @parm_transports{keys %temp_transports} = values %temp_transports;
+

     foreach $k (keys %parm_transports)
       {
       if ($k =~ "/")
     foreach $k (keys %parm_transports)
       {
       if ($k =~ "/")