This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix spelling error in config_argN, RT [perl #82788].
[metaconfig.git] / U / mkglossary
index 1ee760e..0d7288e 100755 (executable)
@@ -21,6 +21,7 @@ my @WANTED = map  { $_->[0] }
             sort { $a->[1] cmp $b->[1] }
             map  { [ $_, lc $_ ] } <$wanted>;
 close $wanted;
+
 print <<'EOM';
 
 !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
@@ -41,7 +42,7 @@ foreach my $file (@perl_units) {
     $Loc = $file, next if $base eq "Loc.U" and not defined $Loc;
     my @var;
     while (<$fh>) {
-       if (m/^\?S:\w+[ \t:]/ .. m/^\?S:.$/) {
+       if (m/^\?S:\w+[ \t:]/ .. m/^\?S:\.$/) {
            s/[ \t]+$//;
            if (m/^\?S:.$/) {
                my ($var) = ((shift @var) =~ /^(\w+)/);
@@ -79,6 +80,7 @@ close $fh or die "$0: close $Loc: $!";
 for (@WANTED) {
     chomp;
     m/^#/ and next;    # Skip comments
+    m/^:/ and next;    # Skip comments
     m/^$/ and next;    # Skip empty sections
     my ($var, $val) = split /=/, $_, 2;
 
@@ -93,7 +95,7 @@ for (@WANTED) {
                # for example).
                print <<EOE;
        This variable is defined but not used by Configure.
-       The value is a plain '' and is not useful.
+       The value is the empty string and is not useful.
 
 EOE
                }
@@ -117,6 +119,8 @@ EOE
     # with capital letters, metalint considers them to be "special
     # unit" symbols.  It's easier to define them here than to try
     # to fool metalint any further.   --AD  22 Oct 1999
+    # Similarly, handle the config_arg* variables from Options.U.
+    # -- AD 8 Dec 2009
     if (exists $predef{$var}) {
        print  $predef{$var};
        next;
@@ -178,3 +182,20 @@ PERL_PATCHLEVEL (Oldsyms.U):
        come from the .patch file, which is available when the perl
        source tree was fetched with rsync.
 
+config_args (Options.U):
+       This variable contains a single string giving the command-line
+       arguments passed to Configure.  Spaces within arguments,
+       quotes, and escaped characters are not correctly preserved.
+       To reconstruct the command line, you must assemble the individual
+       command line pieces, given in config_arg[0-9]*.
+
+config_arg0 (Options.U):
+       This variable contains the string used to invoke the Configure
+       command, as reported by the shell in the $0 variable.
+
+config_argc (Options.U):
+       This variable contains the number of command-line arguments
+       passed to Configure, as reported by the shell in the $# variable.
+       The individual arguments are stored as variables config_arg1,
+       config_arg2, etc.
+