diff --git a/src/getopt.erl b/src/getopt.erl index 662d245..59e9cb7 100644 --- a/src/getopt.erl +++ b/src/getopt.erl @@ -889,7 +889,7 @@ get_env_var(Prefix, Suffix, []) -> Prefix ++ Suffix. --spec line_length() -> non_neg_integer(). +-spec line_length() -> 0..?LINE_LENGTH. line_length() -> case io:columns() of {ok, Columns} when Columns < ?LINE_LENGTH ->