[bug #53541] [PATCH] tmac/an-old.tmac: move or add an italic correction to the right place

[Bjarni Ingi Gislason]

URL:
  <http://savannah.gnu.org/bugs/?53541>

                 Summary: [PATCH] tmac/an-old.tmac: move or add an italic
correction  to the right place
                 Project: GNU troff
            Submitted by: bjarniig
            Submitted on: Sun 01 Apr 2018 02:53:56 PM UTC
                Category: Macro - man
                Severity: 3 - Normal
              Item Group: None
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any
         Planned Release: None

    _______________________________________________________

Details:


>From 253f4fe3004d569def78e09d870ecfdf6c0ac2a1 Mon Sep 17 00:00:00 2001
From: Bjarni Ingi Gislason <address@hidden>
Date: Sun, 1 Apr 2018 14:14:53 +0000
Subject: [PATCH] tmac/an-old.tmac: move or add an italic correction
 to the right place

  Each argument to be italic must have the corrections '\,' and '\/'
around it.

  Add the string "\\*[empty]" to "an-result" in the macro "IR" to be
consistent with the other macros.

Signed-off-by: Bjarni Ingi Gislason <address@hidden>
---
 tmac/an-old.tmac | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/tmac/an-old.tmac b/tmac/an-old.tmac
index 01da3167..95f3ff8f 100644
--- a/tmac/an-old.tmac
+++ b/tmac/an-old.tmac
@@ -527,7 +527,7 @@
 .      as an-result \,\f[I]\\$1\f[R]\/\\$2\\*[an-empty]\"
 .      shift 2
 .    \}
-.    if \\n[.$] .as an-result \,\f[I]\\$1\"
+.    if \\n[.$] .as an-result \,\f[I]\\$1\/\"
 \\*[an-result]
 .    ft R
 .  \}
@@ -537,13 +537,13 @@
 .  an-inputcheck \\$0 \\n[.$]
 .
 .  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]\"
+.      as an-result \\$1\f[I]\,\\$2\f[R]\/\\*[an-empty]\"
 .      shift 2
 .    \}
-.    if \\n[.$] .as an-result \/\\$1\"
+.    if \\n[.$] .as an-result \\$1\"
 \\*[an-result]
 .    ft R
 .  \}
@@ -553,13 +553,13 @@
 .  an-inputcheck \\$0 \\n[.$]
 .
 .  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]\"
+.      as an-result \f[B]\\$1\f[I]\,\\$2\/\\*[an-empty]\"
 .      shift 2
 .    \}
-.    if \\n[.$] .as an-result \/\f[B]\\$1\"
+.    if \\n[.$] .as an-result \f[B]\\$1\"
 \\*[an-result]
 .    ft R
 .  \}
@@ -575,7 +575,7 @@
 .      as an-result \,\f[I]\\$1\f[B]\/\\$2\\*[an-empty]\"
 .      shift 2
 .    \}
-.    if \\n[.$] .as an-result \,\f[I]\\$1\"
+.    if \\n[.$] .as an-result \,\f[I]\\$1\/\"
 \\*[an-result]
 .    ft R
 .  \}
-- 
2.16.2






    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?53541>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/