From 5ab36412b5fc49feb41fa816129c68fd6d946e8b Mon Sep 17 00:00:00 2001
From: David Levine <levinedl@acm.org>
Date: Sat, 20 Dec 2014 09:21:50 -0600
Subject: [PATCH] Removed R from default PARINIT environment variable so that
 par(1) does not consider an input word that is too long to be an error.

---
 docs/contrib/replaliases | 15 +++++++++++----
 etc/mhn.defaults.sh      |  8 +++-----
 2 files changed, 14 insertions(+), 9 deletions(-)

diff --git a/docs/contrib/replaliases b/docs/contrib/replaliases
index 68e9443e..3951aefc 100644
--- a/docs/contrib/replaliases
+++ b/docs/contrib/replaliases
@@ -2,11 +2,13 @@
 ####
 #### convenience functions for various repl(1) commands
 
-#### If using par (see mhn.defaults), it really helps to have its
-#### PARINIT environment variable set.  If you really want it to be
-#### null, either comment this out or set it to, e.g., ' '.
+#### If using par (see mhn.defaults), it helps to have its PARINIT
+#### environment variable set.  If you really want it to be null,
+#### either comment this out or set it to, e.g., ' '.
+#### Removed "R" from PARINIT recommendation in par(1) man page so
+#### that it doesn't consider words that are too long to be an error.
 if [ -z "$PARINIT" ]; then
-    PARINIT='rTbgqR B=.,?_A_a Q=_s>|'
+    PARINIT='rTbgq B=.,?_A_a Q=_s>|'
     export PARINIT
 fi
 
@@ -21,3 +23,8 @@ rt() {
     repl -filter mhl.replywithoutbody -editor mhbuild \
          -convertargs text/html '' -convertargs text/plain '' "$@"
 }
+
+
+# Local Variables:
+# mode: sh
+# End:
diff --git a/etc/mhn.defaults.sh b/etc/mhn.defaults.sh
index 2e43c870..25d7e4af 100755
--- a/etc/mhn.defaults.sh
+++ b/etc/mhn.defaults.sh
@@ -26,11 +26,9 @@ TMP=/tmp/nmh_temp.$$
 trap "rm -f $TMP" 0 1 2 3 13 15
 
 if [ ! -z `$SEARCHPROG "$SEARCHPATH" par` ]; then
-    #### par fails on input lines that are too wide, so used fold(1)
-    #### to wrap them first.  The widths here correspond to those
-    #### for the text browsers below.
-    textfmt=' | fold -s -w 64 | par 64'
-    replfmt=" | fold -s -w 62 | sed 's/^\(.\)/> \1/; s/^$/>/;' | par 64"
+    #### The widths here correspond to those for the text browsers below.
+    textfmt=' | par 64'
+    replfmt=" | sed 's/^\(.\)/> \1/; s/^$/>/;' | par 64"
 elif [ ! -z `$SEARCHPROG "$SEARCHPATH" fmt` ]; then
     textfmt=' | fmt'
     replfmt=" | fmt | sed 's/^\(.\)/> \1/; s/^$/>/;'"
-- 
2.48.1