1
0
mirror of https://git.FreeBSD.org/src.git synced 2024-12-15 10:17:20 +00:00

s/_/./g for an entity name.

Reviewed by:    simon
This commit is contained in:
Hiroki Sato 2004-08-26 08:52:46 +00:00
parent e4e00841a4
commit e5bcf939e4
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=134342

View File

@ -163,6 +163,8 @@ sub parse {
if (/^Nm "?(\w+)"?/ && !defined($mdocvars{Nm})) {
dlog(3, "Setting Nm to $1");
$mdocvars{Nm} = $1;
# "_" cannot be used for an entity name.
$mdocvars{Nm} =~ s,_,.,g;
} elsif (/^Nm$/) {
if (defined($mdocvars{Nm}) && $mdocvars{Nm} ne "") {
@ -198,6 +200,9 @@ sub parse {
$mdocvars{cur_manname} = lc($1);
$cur_mansection = $2;
# "_" cannot be used for an entity name.
$mdocvars{cur_manname} =~ s,_,.,g;
} elsif (/^It ?(.*)$/) {
my $txt = $1;