]> git.ipfire.org Git - thirdparty/coreutils.git/commitdiff
import new version
authorJim Meyering <jim@meyering.net>
Mon, 11 Jan 1999 02:40:27 +0000 (02:40 +0000)
committerJim Meyering <jim@meyering.net>
Mon, 11 Jan 1999 02:40:27 +0000 (02:40 +0000)
man/help2man

index e3e5040c35c7f8ead30e185f176a67ef8a0c3a46..895069e89540502bd965f4beee79c06ddf3ab1e3 100755 (executable)
@@ -25,7 +25,7 @@ use Getopt::Long;
 use POSIX qw(strftime setlocale LC_TIME);
 
 my $this_program = 'help2man';
-my $this_version = '1.006';
+my $this_version = '1.007';
 my $version_info = <<EOT;
 $this_program $this_version
 
@@ -151,22 +151,22 @@ if ($opt_output)
 #
 #   <version>
 #   <program> <version>
-#   GNU <program> <version>
-#   <program> (GNU <package>) <version>
-#   <program> - GNU <package> <version>
+#   {GNU,Free} <program> <version>
+#   <program> ({GNU,Free} <package>) <version>
+#   <program> - {GNU,Free} <package> <version>
 #
 # and seperated from any copyright/author details by a blank line.
 
 $_ = shift @version;
 
-if (/^(\S+)\s+\((GNU\s+[^)]+)\)\s+(.*)/ or
-    /^(\S+)\s+-\s*(GNU\s+\S+)\s+(.*)/)
+if (/^(\S+)\s+\(((?:GNU|Free)\s+[^)]+)\)\s+(.*)/ or
+    /^(\S+)\s+-\s*((?:GNU|Free)\s+\S+)\s+(.*)/)
 {
     $program = $1;
     $package = $2;
     $version = $3;
 }
-elsif (/^(GNU\s+)?(\S+)\s+(.*)/)
+elsif (/^((?:GNU|Free)\s+)?(\S+)\s+(.*)/)
 {
     $program = $2;
     $package = $1 ? "$1$2" : $2;
@@ -193,7 +193,7 @@ my $PROGRAM = uc $program;
 
 # Header.
 print <<EOT;
-.\" DO NOT MODIFY THIS FILE!  It was generated by $this_program $this_version.
+.\\" DO NOT MODIFY THIS FILE!  It was generated by $this_program $this_version.
 .TH $PROGRAM 1 "$date" "$package $version" "FSF"
 .SH NAME
 $include{NAME}