# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1574096423 18000
# Node ID 6efdac6231f2ee5af1f7a415f8b855764f36841a
# Parent  d70dd2b9e3c2d186d96224d514016e4ddbede054
Remove newline before group help

diff -r d70dd2b9e3c2 -r 6efdac6231f2 src/main.lisp
--- a/src/main.lisp	Mon Jul 01 16:03:23 2019 -0400
+++ b/src/main.lisp	Mon Nov 18 12:00:23 2019 -0500
@@ -582,7 +582,7 @@
              (doc-column (+ option-column option-width option-padding))
              (doc-width (- width doc-column)))
         (when help
-          (format stream "~%~{  ~A~^~%~}~2%"
+          (format stream "~{  ~A~^~%~}~2%"
                   (bobbin:wrap (list help) help-width)))
         (dolist (option (options group))
           (print-option-help stream option option-column doc-column doc-width)))))