--- a/lisp/lines.lisp Thu Jun 22 16:01:46 2023 -0400
+++ b/lisp/lines.lisp Sat Jul 15 19:30:07 2023 -0400
@@ -213,7 +213,7 @@
(defparameter *option-one-based*
(adopt:make-option 'one-based
:result-key 'index-base
- :help "Start numbering lines at 1 (default)."
+ :help "Start numbering lines at 1."
:short #\1
:long "one"
:reduce (constantly 1)))
@@ -221,7 +221,7 @@
(defparameter *option-zero-based*
(adopt:make-option 'zero-based
:result-key 'index-base
- :help "Start numbering lines at 0."
+ :help "Start numbering lines at 0 (default)."
:short #\0
:long "zero"
:reduce (constantly 0)))