From 4e9e89bd0dad9cee2792b5ae7d2cc53046e167d2 Mon Sep 17 00:00:00 2001
From: Tuncer Ayaz <tuncer.ayaz@gmail.com>
Date: Sat, 23 Jun 2012 22:04:58 +0200
Subject: Append os family to arch string
---
src/rebar_utils.erl | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
(limited to 'src')
diff --git a/src/rebar_utils.erl b/src/rebar_utils.erl
index 30e8621..ec816b8 100644
--- a/src/rebar_utils.erl
+++ b/src/rebar_utils.erl
@@ -71,7 +71,8 @@ is_arch(ArchRegex) ->
get_arch() ->
Words = wordsize(),
erlang:system_info(otp_release) ++ "-"
- ++ erlang:system_info(system_architecture) ++ "-" ++ Words.
+ ++ erlang:system_info(system_architecture) ++ "-" ++ Words
+ ++ "-" ++ os_family().
wordsize() ->
try erlang:system_info({wordsize, external}) of
@@ -284,6 +285,10 @@ delayed_halt(Code) ->
%% Internal functions
%% ====================================================================
+os_family() ->
+ {OsFamily, _} = os:type(),
+ atom_to_list(OsFamily).
+
get_deprecated_3(Get, Config, OldOpt, NewOpt, Default, When) ->
case Get(Config, NewOpt, Default) of
Default ->
--
cgit v1.1