an-old.tmac: First italic correction (\, ) is absent in macros IR and IB

[Bjarni Ingi Gislason]

Package: groff
Version: 1.22.2
Severity: normal
Tags: patch

  I was trying to find a way to use only macros for font changes as
arguments for the macro TP (tagged paragraph).

  The following piece of code revealed the bug

.TH PROFUN 1 "11th november 2013"
.TP
.BR \-C \ [ \fI\,fd\/\fR ]
.TP
\!.BR \-C \ [\c
.IR fd ]
.TP
\!.B \-C \c
.RI [ fd ]

  Output shows no italic correction between [ and fd in the second
tagged paragraph

Patch:

--- an-old.tmac 2014-06-30 02:14:37.000000000 +0000
+++ an-old.tmac.new     2014-07-29 23:50:47.000000000 +0000
@@ -524,7 +524,7 @@
 .
 .de1 IR
 .  if \\n[.$] \{\
-.    ds an-result \&\f[I]\\$1\f[R]\"
+.    ds an-result \&\f[I]\,\\$1\f[R]\"
 .    shift
 .    while (\\n[.$] >= 2) \{\
 .      as an-result \/\\$1\f[I]\,\\$2\f[R]\"
@@ -538,7 +538,7 @@
 .
 .de1 IB
 .  if \\n[.$] \{\
-.    ds an-result \&\f[I]\\$1\"
+.    ds an-result \&\f[I]\,\\$1\"
 .    shift
 .    while (\\n[.$] >= 2) \{\
 .      as an-result \/\f[B]\\$1\f[I]\,\\$2\\*[an-empty]\"


-- 
Bjarni I. Gislason