diff options
Diffstat (limited to 'docs/docbook/scripts/make-article.pl')
| -rw-r--r-- | docs/docbook/scripts/make-article.pl | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/docs/docbook/scripts/make-article.pl b/docs/docbook/scripts/make-article.pl deleted file mode 100644 index d1f8c66832..0000000000 --- a/docs/docbook/scripts/make-article.pl +++ /dev/null @@ -1,25 +0,0 @@ -#!/usr/bin/perl - -$ignore = 0; - -print "<!DOCTYPE article PUBLIC \"-//OASIS//DTD DocBook V4.1//EN\">\n"; - -while (<STDIN>) { - - $_ =~ s/<chapter/<article/g; - $_ =~ s/<\/chapter/<\/article/g; - - if ( $_ =~ '<articleinfo>') { - $ignore = 1; - } - - if ( $_ =~ '</articleinfo>') { - $ignore = 0; - $_ = ""; - } - - - if (! $ignore) { print "$_"; } - - -} |