From aeb3081111a327d3dc2f43be664c4a4761abde50 Mon Sep 17 00:00:00 2001
From: Tuncer Ayaz <tuncer.ayaz@gmail.com>
Date: Mon, 16 Apr 2012 18:02:48 +0200
Subject: [PATCH] Update getopt.erl

---
 src/getopt.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/getopt.erl b/src/getopt.erl
index 326071c..175b7a5 100644
--- a/src/getopt.erl
+++ b/src/getopt.erl
@@ -442,7 +442,7 @@ is_boolean_arg(Arg) ->
 
 
 -spec is_integer_arg(string()) -> boolean().
-is_integer_arg([$- | Tail]) ->
+is_integer_arg("-" ++ Tail) ->
     is_non_neg_integer_arg(Tail);
 is_integer_arg(Arg) ->
     is_non_neg_integer_arg(Arg).