From 0e729bf90e64a00bd8915e227d83f82877038e9e Mon Sep 17 00:00:00 2001
From: Tuncer Ayaz <tuncer.ayaz@gmail.com>
Date: Sat, 29 Jan 2011 15:50:24 +0100
Subject: [PATCH] Fix Dialyzer warnings in rebar_upgrade

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

diff --git a/src/rebar_upgrade.erl b/src/rebar_upgrade.erl
index 4c0d2f7..0026cee 100644
--- a/src/rebar_upgrade.erl
+++ b/src/rebar_upgrade.erl
@@ -54,7 +54,7 @@
             run_systools(NameVer, NewName),
 
             %% Boot file changes
-            boot_files(NewVer, NewName),
+            {ok, _} = boot_files(NewVer, NewName),
 
             %% Extract upgrade and tar it back up with changes
             make_tar(NameVer),
@@ -183,7 +183,7 @@ cleanup(NameVer, Name, Ver) ->
              filename:join([".", NameVer ++ ".script"]),
              filename:join([".", "relup"])
             ],
-    [ok = file:delete(F) || F <- Files],
+    lists:foreach(fun(F) -> ok = file:delete(F) end, Files),
 
     ok = remove_dir_tree("releases"),
     ok = remove_dir_tree("lib").