FYI: Autoheader & autoscan using channels

[Akim Demaille]

Index: ChangeLog
from  Akim Demaille  <address@hidden>

        * bin/autoheader.in (&parse_args): Use &parse_warnings and
        &parse_WARNINGS.
        ($help): Use Autom4te::ChannelDefs::usage.
        * bin/autoscan.in: Use Autom4te::ChannelDefs.
        * lib/Autom4te/General.pm: Don't export error: you don't own it.

Index: bin/autoheader.in
===================================================================
RCS file: /cvsroot/autoconf/autoconf/bin/autoheader.in,v
retrieving revision 1.133
diff -u -u -r1.133 autoheader.in
--- bin/autoheader.in 21 Aug 2003 06:55:41 -0000 1.133
+++ bin/autoheader.in 21 Aug 2003 17:30:48 -0000
@@ -56,12 +56,11 @@
 my $config_h_in;
 my @prepend_include;
 my @include;
-my @warning;
 
 
 # $HELP
 # -----
-$help = <<"END";
+$help = "\
 Usage: $0 [OPTION] ... [TEMPLATE-FILE]
 
 Create a template file of C \`\#define\' statements for \`configure\' to
@@ -75,31 +74,26 @@
   -f, --force              consider all files obsolete
   -W, --warnings=CATEGORY  report the warnings falling in CATEGORY
 
-Warning categories include:
-  \`obsolete\'      obsolete constructs
-  \`all\'           all the warnings
-  \`no-CATEGORY\'   turn off the warnings on CATEGORY
-  \`none\'          turn off all the warnings
-  \`error\'         warnings are error
+" . Autom4te::ChannelDefs::usage () . "
 
 Library directories:
   -B, --prepend-include=DIR  prepend directory DIR to search path
   -I, --include=DIR          append directory DIR to search path
 
 Report bugs to <address@hidden>.
-END
+";
 
 
 # $VERSION
 # --------
-$version = <<"END";
+$version = "\
 autoheader (@PACKAGE_NAME@) @VERSION@
 Written by Roland McGrath and Akim Demaille.
 
 Copyright (C) 2003 Free Software Foundation, Inc.
 This is free software; see the source for copying conditions.  There is NO
 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-END
+";
 
 
 ## ---------- ##
@@ -114,9 +108,10 @@
 {
   my $srcdir;
 
-  getopt ('I|include=s' => address@hidden,
+  parse_WARNINGS;
+  getopt ('I|include=s'         => address@hidden,
          'B|prepend-include=s' => address@hidden,
-         'W|warnings=s' => address@hidden);
+         'W|warnings=s'        => \&parse_warnings);
 
   setup_channel 'note', silent => !$verbose;
 
Index: bin/autoscan.in
===================================================================
RCS file: /cvsroot/autoconf/autoconf/bin/autoscan.in,v
retrieving revision 1.93
diff -u -u -r1.93 autoscan.in
--- bin/autoscan.in 21 Aug 2003 06:55:42 -0000 1.93
+++ bin/autoscan.in 21 Aug 2003 17:30:48 -0000
@@ -36,6 +36,7 @@
   $ENV{'SHELL'} = '@SHELL@' if ($^O eq 'dos');
 }
 
+use Autom4te::ChannelDefs;
 use Autom4te::Configure_ac;
 use Autom4te::General;
 use Autom4te::XFile;
Index: lib/Autom4te/General.pm
===================================================================
RCS file: /cvsroot/autoconf/autoconf/lib/Autom4te/General.pm,v
retrieving revision 1.30
diff -u -u -r1.30 General.pm
--- lib/Autom4te/General.pm 21 Aug 2003 06:55:42 -0000 1.30
+++ lib/Autom4te/General.pm 21 Aug 2003 17:30:48 -0000
@@ -53,7 +53,7 @@
 
 # Functions we define and export.
 my @export_subs =
-  qw (&debug &error
+  qw (&debug
       &file_name_is_absolute
       &getopt &mktmpdir
       &uniq &verbose);
Index: man/autoheader.1
===================================================================
RCS file: /cvsroot/autoconf/autoconf/man/autoheader.1,v
retrieving revision 1.81
diff -u -u -r1.81 autoheader.1
--- man/autoheader.1 20 Aug 2003 07:02:32 -0000 1.81
+++ man/autoheader.1 21 Aug 2003 17:30:48 -0000
@@ -1,5 +1,5 @@
 .\" DO NOT MODIFY THIS FILE!  It was generated by help2man 1.33.
-.TH AUTOHEADER "1" "August 2003" "autoheader 2.57b" "User Commands"
+.TH AUTOHEADER "1" "August 2003" "autoheader " "User Commands"
 .SH NAME
 autoheader \- Create a template header for configure
 .SH SYNOPSIS
@@ -29,20 +29,38 @@
 report the warnings falling in CATEGORY
 .SS "Warning categories include:"
 .TP
+`cross'
+cross compilation issues
+.TP
+`gnu'
+GNU coding standards (default in gnu and gnits modes)
+.TP
 `obsolete'
-obsolete constructs
+obsolete features or constructions
+.TP
+`override'
+user redefinitions of Automake rules or variables
+.TP
+`portability'
+portability issues
+.TP
+`syntax'
+dubious syntactic constructs (default)
+.TP
+`unsupported'
+unsupported or incomplete features (default)
 .TP
 `all'
 all the warnings
 .TP
 `no-CATEGORY'
-turn off the warnings on CATEGORY
+turn off warnings in CATEGORY
 .TP
 `none'
 turn off all the warnings
 .TP
 `error'
-warnings are error
+treat warnings as errors
 .SS "Library directories:"
 .TP
 \fB\-B\fR, \fB\-\-prepend\-include\fR=\fIDIR\fR
@@ -54,6 +72,8 @@
 Written by Roland McGrath and Akim Demaille.
 .SH "REPORTING BUGS"
 Report bugs to <address@hidden>.
+.PP
+autoheader (GNU Autoconf) 2.57b
 .SH COPYRIGHT
 Copyright \(co 2003 Free Software Foundation, Inc.
 .br