diff options
Diffstat (limited to 'src/bin/psql/create_help.pl')
-rw-r--r-- | src/bin/psql/create_help.pl | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/src/bin/psql/create_help.pl b/src/bin/psql/create_help.pl index f802d5ed791..638b96600f8 100644 --- a/src/bin/psql/create_help.pl +++ b/src/bin/psql/create_help.pl @@ -5,7 +5,7 @@ # # Copyright 2000 by PostgreSQL Global Development Group # -# $Header: /cvsroot/pgsql/src/bin/psql/create_help.pl,v 1.3 2000/01/29 16:58:48 petere Exp $ +# $Header: /cvsroot/pgsql/src/bin/psql/create_help.pl,v 1.4 2000/02/07 23:10:06 petere Exp $ ################################################################# # @@ -56,6 +56,8 @@ struct _helpStruct static struct _helpStruct QL_HELP[] = { "; +$count = 0; + foreach $file (sort readdir DIR) { my ($cmdname, $cmddesc, $cmdsynopsis); $file =~ /\.sgml$/ || next; @@ -84,6 +86,7 @@ foreach $file (sort readdir DIR) { $cmdsynopsis =~ s/\"/\\"/g; print OUT " { \"$cmdname\",\n \"$cmddesc\",\n \"$cmdsynopsis\" },\n\n"; + $count++; } else { print STDERR "$0: parsing file '$file' failed at or near line $. (N='$cmdname' D='$cmddesc')\n"; @@ -94,6 +97,10 @@ print OUT " { NULL, NULL, NULL } /* End of list marker */ }; + +#define QL_HELP_COUNT $count + + #endif /* $define */ "; |