mirror of
https://github.com/samba-team/samba.git
synced 2025-01-31 01:48:16 +03:00
merge
This commit is contained in:
parent
6270765ed5
commit
6b38c1cb25
File diff suppressed because it is too large
Load Diff
25
docs/docbook/scripts/make-article.pl
Normal file
25
docs/docbook/scripts/make-article.pl
Normal file
@ -0,0 +1,25 @@
|
||||
#!/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 "$_"; }
|
||||
|
||||
|
||||
}
|
13
docs/docbook/scripts/strip-links.pl
Normal file
13
docs/docbook/scripts/strip-links.pl
Normal file
@ -0,0 +1,13 @@
|
||||
#!/usr/bin/perl
|
||||
|
||||
## small script to stirp the <URL:...> tags from
|
||||
## manpages generated from docbook2man. we'll leave
|
||||
## the <URL:ftp://...> and <URL:mailto:...> links for now
|
||||
|
||||
while (<STDIN>) {
|
||||
|
||||
$_ =~ s/\s*<URL:.*html.*>\s*//g;
|
||||
print "$_";
|
||||
|
||||
}
|
||||
exit 0;
|
Loading…
x
Reference in New Issue
Block a user