diff options
-rw-r--r-- | ChangeLog | 3 | ||||
-rw-r--r-- | mdoc2man.pl | 6 |
2 files changed, 6 insertions, 3 deletions
@@ -1,5 +1,6 @@ | |||
1 | 20020417 | 1 | 20020417 |
2 | - (djm) Tell users to configure /dev/random support into OpenSSL in INSTALL | 2 | - (djm) Tell users to configure /dev/random support into OpenSSL in INSTALL |
3 | - (djm) Fix .Nm in mdoc2man.pl from pspencer@fields.utoronto.ca | ||
3 | 4 | ||
4 | 20020415 | 5 | 20020415 |
5 | - (djm) Unbreak "make install". Fix from Darren Tucker <dtucker@zip.com.au> | 6 | - (djm) Unbreak "make install". Fix from Darren Tucker <dtucker@zip.com.au> |
@@ -8251,4 +8252,4 @@ | |||
8251 | - Wrote replacements for strlcpy and mkdtemp | 8252 | - Wrote replacements for strlcpy and mkdtemp |
8252 | - Released 1.0pre1 | 8253 | - Released 1.0pre1 |
8253 | 8254 | ||
8254 | $Id: ChangeLog,v 1.2057 2002/04/17 02:22:58 djm Exp $ | 8255 | $Id: ChangeLog,v 1.2058 2002/04/17 02:30:45 djm Exp $ |
diff --git a/mdoc2man.pl b/mdoc2man.pl index fddb2e09d..928fc5d7a 100644 --- a/mdoc2man.pl +++ b/mdoc2man.pl | |||
@@ -318,11 +318,13 @@ sub ParseMacro # ($line) | |||
318 | 318 | ||
319 | if (/^Nm$/) | 319 | if (/^Nm$/) |
320 | { | 320 | { |
321 | $name = shift @words | 321 | my $n = $name; |
322 | $n = shift @words | ||
322 | if (@words > 0); | 323 | if (@words > 0); |
324 | $name = $n unless $name; | ||
323 | $retval .= ".br\n" | 325 | $retval .= ".br\n" |
324 | if ($synopsis); | 326 | if ($synopsis); |
325 | $retval .= "\\fB$name\\fP"; | 327 | $retval .= "\\fB$n\\fP"; |
326 | $nospace = 1 | 328 | $nospace = 1 |
327 | if (! $nospace && $words[0] =~ m/^[\.,]/); | 329 | if (! $nospace && $words[0] =~ m/^[\.,]/); |
328 | next; | 330 | next; |