diff options
Diffstat (limited to 'stdlib/getopts.tl')
| -rw-r--r-- | stdlib/getopts.tl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/stdlib/getopts.tl b/stdlib/getopts.tl index 1d714126..e448c130 100644 --- a/stdlib/getopts.tl +++ b/stdlib/getopts.tl @@ -294,7 +294,9 @@ (long long) (short `@{"" 21} @short`))) (lines (if od.helptext (sys:wdwrap od.helptext 43)))) - (put-line ` @{ls 34}@(pop lines)` stream) + (if (>= (len ls) 34) + (put-line ` @ls` stream) + (put-line ` @{ls 34}@(pop lines)` stream)) (while lines (put-line ` @{"" 34}@(pop lines)` stream)))) (put-line : stream) |