diff options
| author | Dan Gudmundsson <dgud@erlang.org> | 2012-11-16 11:54:53 +0100 |
|---|---|---|
| committer | Dan Gudmundsson <dgud@erlang.org> | 2012-12-13 13:00:44 +0100 |
| commit | 54933c352a9e8fd29f38f72487394d8f6fa7a2b7 (patch) | |
| tree | 6bc8d6d0b108d43fbad673ed7afa505b6b160855 /lib/wx/src/wxe_util.erl | |
| parent | b5d0403d8fedd8ca741b3c0a6ea684e72a494394 (diff) | |
| download | erlang-54933c352a9e8fd29f38f72487394d8f6fa7a2b7.tar.gz | |
wx: Build targets to platform subdirs
And add code so wx can be run from src tree during development.
Diffstat (limited to 'lib/wx/src/wxe_util.erl')
| -rw-r--r-- | lib/wx/src/wxe_util.erl | 16 |
1 files changed, 11 insertions, 5 deletions
diff --git a/lib/wx/src/wxe_util.erl b/lib/wx/src/wxe_util.erl index 3022b7f3f2..a31c3e30b8 100644 --- a/lib/wx/src/wxe_util.erl +++ b/lib/wx/src/wxe_util.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2008-2010. All Rights Reserved. +%% Copyright Ericsson AB 2008-2012. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -233,10 +233,16 @@ priv_dir(Driver0, Silent) -> {ok, _} -> Priv; {error, _} -> - opt_error_log(Silent, - "ERROR: Could not find \'~s\' in: ~s~n", - [Driver, Priv]), - erlang:error({load_driver, "No driver found"}) + SrcPriv = filename:join(Priv, erlang:system_info(system_architecture)), + case file:read_file_info(filename:join(SrcPriv, Driver)) of + {ok, _} -> + SrcPriv; + {error, _} -> + opt_error_log(Silent, + "ERROR: Could not find \'~s\' in: ~s~n", + [Driver, Priv]), + erlang:error({load_driver, "No driver found"}) + end end. strip(Src, Src) -> |