Bugfix in read-bible.in: help message displayed w/o args

scripts/read-bible.in

@@ -31,6 +31,8 @@ exec guile -e '(@ (read-bible) main)' -s "$0" "$@"
   (define-syntax conf
     (syntax-rules (else)
       ((_ (f e)... (else g)) (cond ((flag? f) e)... (else g)))))
+  (if (< (length args) 2)
+      (help)
       (with-bible (cadr args)
                   (conf ("-h" (help))
                         ("-v" (version))
@@ -38,4 +40,4 @@ exec guile -e '(@ (read-bible) main)' -s "$0" "$@"
                                   (call-with-chapter (get "-b") (get "-c")
                                                      print-text)
                                   (call-with-book (get "-b") print-text)))
-                    (else (help)))))
+                        (else (help))))))