From fe56a2618e9cf0985d49533eabcbb6d21816b0d1 Mon Sep 17 00:00:00 2001
From: Tuncer Ayaz <tuncer.ayaz@gmail.com>
Date: Fri, 21 Sep 2012 19:10:07 +0200
Subject: [PATCH] Fix Dialyzer warnings

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

diff --git a/src/getopt.erl b/src/getopt.erl
index fcd7d36..f4773bd 100644
--- a/src/getopt.erl
+++ b/src/getopt.erl
@@ -660,7 +660,7 @@ tokenize_quoted_arg(_QuotationMark, CmdLine, Acc, ArgAcc) ->
     tokenize(CmdLine, Acc, ArgAcc).
 
 
--spec expand_env_var(CmdLine :: string()) -> string().
+-spec expand_env_var(CmdLine :: string()) -> {string(), string()}.
 expand_env_var(CmdLine) ->
     case CmdLine of
         "${" ++ Tail ->
@@ -671,7 +671,7 @@ expand_env_var(CmdLine) ->
             expand_env_var("%", $%, Tail, [])
     end.
 
--spec expand_env_var(Prefix :: string(), EndMark :: char(), CmdLine :: string(), Acc :: string()) -> string().
+-spec expand_env_var(Prefix :: string(), EndMark :: char(), CmdLine :: string(), Acc :: string()) -> {string(), string()}.
 expand_env_var(Prefix, EndMark, [Char | Tail], Acc)
   when (Char >= $A andalso Char =< $Z) orelse (Char >= $a andalso Char =< $z) orelse
        (Char >= $0 andalso Char =< $9) orelse (Char =:= $_) ->
@@ -682,7 +682,7 @@ expand_env_var(Prefix, _EndMark, CmdLine, Acc) ->
     {CmdLine, Prefix ++ lists:reverse(Acc)}.
 
 
--spec expand_env_var(Prefix :: string(), CmdLine :: string(), Acc :: string()) -> string().
+-spec expand_env_var(Prefix :: string(), CmdLine :: string(), Acc :: string()) -> {string(), string()}.
 expand_env_var(Prefix, [Char | Tail], Acc)
   when (Char >= $A andalso Char =< $Z) orelse (Char >= $a andalso Char =< $z) orelse
        (Char >= $0 andalso Char =< $9) orelse (Char =:= $_) ->