diff options
| author | Andrew Tridgell <tridge@samba.org> | 2010-02-23 09:04:44 +1100 |
|---|---|---|
| committer | Andrew Tridgell <tridge@samba.org> | 2010-04-06 20:26:35 +1000 |
| commit | 5393e6c9d24cd66aab57274665be1774beb4e732 (patch) | |
| tree | 126dc0d181710b5df7c5220094d95c74968252de /buildtools/mktowscript/mktowscript.pl | |
| parent | 73634d6ff337f3a23bb950a430569f5b3946ed9a (diff) | |
| download | samba-5393e6c9d24cd66aab57274665be1774beb4e732.tar.gz samba-5393e6c9d24cd66aab57274665be1774beb4e732.tar.bz2 samba-5393e6c9d24cd66aab57274665be1774beb4e732.zip | |
build: recognise manpages keyword
Diffstat (limited to 'buildtools/mktowscript/mktowscript.pl')
| -rwxr-xr-x | buildtools/mktowscript/mktowscript.pl | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/buildtools/mktowscript/mktowscript.pl b/buildtools/mktowscript/mktowscript.pl index 2ebf2d92c2..86ff65bd2e 100755 --- a/buildtools/mktowscript/mktowscript.pl +++ b/buildtools/mktowscript/mktowscript.pl @@ -70,6 +70,13 @@ sub find_files($) my $list = shift; my $ret = ''; foreach my $f (split(/\s+/, $list)) { + if ($f =~ /\.[0-9]$/) { + # a man page + my $m = find_file($f . ".xml"); + die("Unable to find man page $f\n") if ($m eq ""); + $m =~ s/\.xml$//; + return $m; + } $f = find_file($f); $f =~ s/^[.]\///; $ret .= ' ' . $f; @@ -204,7 +211,6 @@ foreach my $s (sort {$result->{$a}->{SECNUMBER} <=> $result->{$b}->{SECNUMBER}} $k eq "GCOV" || $k eq "PC_FILES" || $k eq "PUBLIC_HEADERS" || - $k eq "MANPAGES" || $k eq "CONFIG4FILE" || $k eq "LMHOSTSFILE4") { $trailer .= sprintf(",\n\t# %s='%s'", $k, trim($sec->{$k})); @@ -267,6 +273,11 @@ foreach my $s (sort {$result->{$a}->{SECNUMBER} <=> $result->{$b}->{SECNUMBER}} $trailer .= sprintf(",\n\tautoproto='%s'", $list); next; } + if ($k eq "MANPAGES") { + my $list = trim(find_files(strlist($sec->{$k}))); + $trailer .= sprintf(",\n\tmanpages='%s'", $list); + next; + } if ($k eq "$s" . "_OBJ_FILES") { my $list = trim(strlist($sec->{$k})); $list =~ s/\.o/.c/g; |