Adds warnings about two curves and fixes the "seed" value for two other
[openssl.git] / util / extract-names.pl
index d413a045cc450da934e9b2a76833859b3881eeea..744a8e2324e6cc7aaa2641d644ac2cfe1eeeafe8 100644 (file)
@@ -9,8 +9,10 @@ while(<STDIN>) {
     } elsif ($name) {
        if (/ - /) {
            s/ - .*//;
-           s/[ \t,]+/ /g;
-           push @words, split ' ';
+           s/,[ \t]+/,/g;
+           s/^[ \t]+//g;
+           s/[ \t]+$//g;
+           push @words, split ',';
        }
     }
     if (/^=head1 *NAME *$/) {