summaryrefslogtreecommitdiffstats
path: root/tools/progdoc
diff options
context:
space:
mode:
authorMartin Mares <mj@ucw.cz>2000-06-05 11:51:24 +0200
committerMartin Mares <mj@ucw.cz>2000-06-05 11:51:24 +0200
commit42b3daa09cda8a4b80661177d3bf74b9258b0b88 (patch)
treeeb208425de5b9a494c42abc5945da7b48d1d09cc /tools/progdoc
parentac272c0067cc7f04e74f0418bc0c9ce63a657175 (diff)
downloadbird-42b3daa09cda8a4b80661177d3bf74b9258b0b88.tar
bird-42b3daa09cda8a4b80661177d3bf74b9258b0b88.zip
Description of protocol module moved to where it belongs. If documentation
of standard modules is stored in their source, such auxilliary files should be as well.
Diffstat (limited to 'tools/progdoc')
-rwxr-xr-xtools/progdoc8
1 files changed, 4 insertions, 4 deletions
diff --git a/tools/progdoc b/tools/progdoc
index a5028bd..ef44d3a 100755
--- a/tools/progdoc
+++ b/tools/progdoc
@@ -3,15 +3,15 @@
$srcdir = $ARGV[0];
open(OUT, ">prog.sgml") || die "Cannot create output file";
-include("prog-head.sgml");
+include("doc/prog-head.sgml");
process("");
-include("prog-foot.sgml");
+include("doc/prog-foot.sgml");
close OUT;
exit 0;
sub include {
my $f = shift @_;
- open(IN, "$srcdir/doc/$f") || die "Unable to find $f";
+ open(IN, "$srcdir/$f") || die "Unable to find $f";
while (<IN>) {
print OUT;
}
@@ -41,7 +41,7 @@ sub process {
close DOC;
} elsif ($cmd eq "D") {
print " $arg\n";
- include($arg);
+ include("$dir/$arg");
} else { die "Unknown command: $cmd"; }
}
}