Commit dc4e41dc authored by unknown's avatar unknown

- fixed the automatic generation of support-files/MacOSX/ReadMe.txt -

   a node name was changed in manual.texi which resulted in a very large
   ReadMe.txt file, as the generating script could not find the (renamed)
   ending node. Fixed the ending node name in Docs/Makefile.am and the 
   Docs/Support/generate-text-files.pl Perl script to make sure this does
   not happen again (I only discovered this because the Do-pkg script was
   not able to add the ReadMe.txt to the Apple Disk image because it ran out
   of disk space due to the size of the file)


Docs/Makefile.am:
   - Fixed a node name that was changed in manual.texi and resulted in
     the generation of a _very_ large ReadMe.txt file (down to the very end
     of the manual, since the ending node was not found)
Docs/Support/generate-text-files.pl:
   - added a safeguard: if the ending node was not found, abort with an error
     to indicate that the generated text file might be too large (as it would
     contain the whole manual, down from the starting node)
   - made some cosmetical changes
parent 47d9c95f
...@@ -208,7 +208,7 @@ INSTALL-BINARY: mysql.info $(GT) ...@@ -208,7 +208,7 @@ INSTALL-BINARY: mysql.info $(GT)
perl -w $(GT) mysql.info "LGPL license" "Function Index" > $@ perl -w $(GT) mysql.info "LGPL license" "Function Index" > $@
../support-files/MacOSX/ReadMe.txt: mysql.info $(GT) ../support-files/MacOSX/ReadMe.txt: mysql.info $(GT)
perl -w $(GT) mysql.info "Mac OS X installation" "Netware installation" > $@ perl -w $(GT) mysql.info "Mac OS X installation" "NetWare installation" > $@
# Don't update the files from bitkeeper # Don't update the files from bitkeeper
%::SCCS/s.% %::SCCS/s.%
#!/my/gnu/bin/perl -w -*- perl -*- #!/usr/bin/perl -w -*- perl -*-
# Generate text files from top directory from the manual. # Generate text files from top directory from the manual.
$from = shift(@ARGV); $from = shift(@ARGV);
$fnode = shift(@ARGV); $fnode = shift(@ARGV);
$tnode = shift(@ARGV); $tnode = shift(@ARGV);
open(IN, "$from") || die; open(IN, "$from") || die "Cannot open $from: $!";
$in = 0; $in = 0;
...@@ -19,7 +19,7 @@ while (<IN>) ...@@ -19,7 +19,7 @@ while (<IN>)
} }
elsif (/^File: mysql.info/ || (/^/)) elsif (/^File: mysql.info/ || (/^/))
{ {
# Just Skip node begginigs # Just Skip node beginnings
} }
else else
{ {
...@@ -38,3 +38,6 @@ while (<IN>) ...@@ -38,3 +38,6 @@ while (<IN>)
} }
close(IN); close(IN);
die "Could not find node \"$tnode\"" if ($in == 1);
exit 0;
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment