diff options
author | unknown <kent@mysql.com/kent-amd64.(none)> | 2007-11-02 12:29:13 +0100 |
---|---|---|
committer | unknown <kent@mysql.com/kent-amd64.(none)> | 2007-11-02 12:29:13 +0100 |
commit | 5ee36c1d971d2f151c615ab2c14f704c7f8cca09 (patch) | |
tree | 31c5e0d04f4d0567094eccb1d2d3d6ba87c44db8 /Docs/Support/generate-text-files.pl | |
parent | a7e5f73abb9da35a1c199b89df84596cffe59901 (diff) | |
download | mariadb-git-5ee36c1d971d2f151c615ab2c14f704c7f8cca09.tar.gz |
mysql.info, INSTALL-BINARY, INSTALL-SOURCE, ReadMe.txt, Docs/Makefile.am:
Let place holders for real documentation have text that
makes sense to the user (Bug#25205)
BitKeeper/deleted/.del-generate-text-files.pl:
Delete: Docs/Support/generate-text-files.pl
Docs/INSTALL-BINARY:
BitKeeper file /home/kent/bk/bug25205/mysql-4.0/Docs/INSTALL-BINARY
INSTALL-SOURCE:
BitKeeper file /home/kent/bk/bug25205/mysql-4.0/INSTALL-SOURCE
support-files/MacOSX/ReadMe.txt:
BitKeeper file /home/kent/bk/bug25205/mysql-4.0/support-files/MacOSX/ReadMe.txt
Docs/mysql.info:
More of a end-user text
Docs/Makefile.am:
Don't generate text files from the documentation
Diffstat (limited to 'Docs/Support/generate-text-files.pl')
-rwxr-xr-x | Docs/Support/generate-text-files.pl | 43 |
1 files changed, 0 insertions, 43 deletions
diff --git a/Docs/Support/generate-text-files.pl b/Docs/Support/generate-text-files.pl deleted file mode 100755 index 0829525f679..00000000000 --- a/Docs/Support/generate-text-files.pl +++ /dev/null @@ -1,43 +0,0 @@ -#!/usr/bin/perl -w -*- perl -*- -# Generate text files from top directory from the manual. - -$from = shift(@ARGV); -$fnode = shift(@ARGV); -$tnode = shift(@ARGV); - -open(IN, "$from") || die "Cannot open $from: $!"; - -$in = 0; - -while (<IN>) -{ - if ($in) - { - if (/Node: $tnode,/ || /\[index/) - { - $in = 0; - } - elsif (/^File: mysql.info/ || (/^/)) - { - # Just Skip node beginnings - } - else - { - print; - } - } - else - { - if (/Node: $fnode,/) - { - $in = 1; - # Skip first empty line - <IN>; - } - } -} - -close(IN); - -die "Could not find node \"$tnode\"" if ($in == 1); -exit 0; |