This has not been updated in a while, catch up with the current format.

This commit is contained in:
Mathieu Arnold 2016-11-08 13:13:28 +00:00
parent cc4bbecdf2
commit 46ee99cd02
Notes: svn2git 2020-12-08 03:00:23 +00:00
svn path=/head/; revision=49647

View file

@ -7,5 +7,5 @@ while (<>) {
next unless (m,^(.*/)([\w\._-]+)\.(\d\w*)(\.gz)?$,);
my ($entity, $page, $volume) = ($2, $2, $3);
$entity =~ y/_/./;
print "<!ENTITY man.$entity.$volume \"<citerefentry/<refentrytitle/$page/<manvolnum/$volume//\">\n";
print "<!ENTITY man.$entity.$volume \"<citerefentry xmlns='http://docbook.org/ns/docbook'><refentrytitle>$page</refentrytitle><manvolnum>$volume</manvolnum></citerefentry>\">\n";
}