[groff] 01/01: Fix centering of pic output.

[Peter Schaffter]

PTPi pushed a commit to branch master
in repository groff.

commit d57ab4c989c0a804250e2cb6921e123b18bb2728
Author: Peter Schaffter <address@hidden>
Date:   Mon Jun 25 21:04:51 2018 -0400

    Fix centering of pic output.
---
 contrib/mom/BUGS    |  8 ++++++++
 contrib/mom/om.tmac | 11 +++++++----
 2 files changed, 15 insertions(+), 4 deletions(-)

diff --git a/contrib/mom/BUGS b/contrib/mom/BUGS
index 2e1cc89..956fa0e 100644
--- a/contrib/mom/BUGS
+++ b/contrib/mom/BUGS
@@ -21,6 +21,14 @@ the Subject line or you risk my spam filters nuking your 
message.
 
 ====================================================================
 
+Version 2.3
+===========
+.PS/.PE not working at start of documents without a preceding .PP.
+---Fixed---
+
+Output of .PS/.PE not centered correctly (the default).
+---Fixed---
+
 Version 2.2-a
 =============
 Omitting postfixed digit from ROMAN/roman args to LIST not
diff --git a/contrib/mom/om.tmac b/contrib/mom/om.tmac
index daea3b5..061dd1f 100644
--- a/contrib/mom/om.tmac
+++ b/contrib/mom/om.tmac
@@ -20,8 +20,8 @@ for more details.
 You should have received a copy of the GNU General Public License
 along with this program. If not, see <http://www.gnu.org/licenses/>.
 
-Version 2.3
------------
+Version 2.3-a
+-------------
 Antoine de St-Exupéry asserted that elegance in engineering is
 achieved not when there is nothing left to add, but when there is
 nothing left to take away.
@@ -54,7 +54,7 @@ extensions, and float management).
 .if (\n[.x]\n[.y] < 118) \
 .   ab [mom]: You need GNU troff version 1.18 or higher to run this version of 
mom.
 \# Mom version
-.ds version 2.2-a
+.ds version 2.3-a
 .if dVERSION \{\
 .   ab [mom]: Version \*[version]
 .\}
@@ -20921,6 +20921,7 @@ does not fit on page \\n[pgnum]\\*[col-num].
 \# Main macros
 \#
 .MAC PS END
+.    if !\\n[#PP] .nop
 .    br
 .    have-adjust \\$@ \" Adjusting is handled by FLOAT
 .    ds ev-current \\n[.ev]
@@ -21059,7 +21060,9 @@ does not fit on page \\n[pgnum]\\*[col-num].
 .       br
 .       ev
 .    \}
-.    if !\\n[pic*left] .in \\n[ll-pre-pic]u-\\n[pic*div-width]u/2u
+.\"
+.\" .if !\\n[pic*left] .in \\n[ll-pre-pic]u-\\n[pic*div-width]u/2u
+.\"
 .    pic*div
 .    sp
 .    if 
(\\n[pic*have-label]=1):(\\n[pic*autolabel]=1):(\\n[pic*caption-after-label]=1) 
\{\