From 8151b3f37dcb065bf271b3b127a53e02105fa28e Mon Sep 17 00:00:00 2001
From: Juan Jose Comellas <juanjo@comellas.org>
Date: Fri, 25 Jan 2013 13:56:55 -0300
Subject: [PATCH] The maximum width for the usage output is now 75 characters

---
 src/getopt.erl | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/getopt.erl b/src/getopt.erl
index 0e4f86a..ed23884 100644
--- a/src/getopt.erl
+++ b/src/getopt.erl
@@ -812,10 +812,8 @@ get_env_var(Prefix, Suffix, []) ->
 -spec line_length() -> non_neg_integer().
 line_length() ->
     case io:columns() of
-        {ok, Columns} when Columns >= ?LINE_LENGTH ->
-            Columns - 5;
-        {ok, Columns} ->
-            Columns;
+        {ok, Columns} when Columns < ?LINE_LENGTH ->
+            Columns - 1;
         _ ->
             ?LINE_LENGTH
     end.