X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/2e768e3cc0ce768373d3320eca4cdd08b8cf646a..fad589fd1879f684ba437645e53811320942f8a4:/test/format/test-rightjustify?ds=inline

diff --git a/test/format/test-rightjustify b/test/format/test-rightjustify
index 2685efd0..4dec55ab 100755
--- a/test/format/test-rightjustify
+++ b/test/format/test-rightjustify
@@ -12,16 +12,18 @@ fi
 
 setup_test
 
-actual=`${MH_LIB_DIR}/ap -format "%-30(friendly{text})<<End of test" "No Such User <nosuch@user.com>"`
-expected="                  No Such User<<End of test"
-##########123456789012345678901234567890
+for prefix in '' '>' '2>'; do
+    actual=`run_prog ${MH_LIBEXEC_DIR}/ap -format "$prefix%-20(friendly{text})<<End of test" 'No Such User <nosuch@user.com>'`
+    expected="$prefix        No Such User<<End of test"
+    #                1       10        20
 
-if test x"$actual" != x"$expected"; then
-    echo "$0: right justification test expected:" 1>&2
-    echo "    $expected" 1>&2
-    echo "but instead got:" 1>&2
-    echo "    $actual" 1>&2
-    failed=`expr ${failed:-0} + 1`
-fi
+    if test x"$actual" != x"$expected"; then
+        echo "$0: right justification test expected:" 1>&2
+        echo "    $expected" 1>&2
+        echo "but instead got:" 1>&2
+        echo "    $actual" 1>&2
+        failed=`expr ${failed:-0} + 1`
+    fi
+done
 
 exit $failed