From 1c1a32b8bae3130671eec3298f6ae07bf41d734d Mon Sep 17 00:00:00 2001
From: Tuncer Ayaz <tuncer.ayaz@gmail.com>
Date: Tue, 7 Feb 2012 20:11:50 +0100
Subject: Use lists:flatmap/2
---
src/rebar_port_compiler.erl | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
(limited to 'src')
diff --git a/src/rebar_port_compiler.erl b/src/rebar_port_compiler.erl
index ef62c4c..4acbf36 100644
--- a/src/rebar_port_compiler.erl
+++ b/src/rebar_port_compiler.erl
@@ -179,14 +179,14 @@ get_sources(Config) ->
end.
expand_port_specs(Specs) ->
- lists:append(lists:map(fun({_, Target, FileSpecs}) ->
- expand_file_specs(Target, FileSpecs);
- ({Target, FileSpecs}) ->
- expand_file_specs(Target, FileSpecs)
- end, filter_port_specs(Specs))).
+ lists:flatmap(fun({_, Target, FileSpecs}) ->
+ expand_file_specs(Target, FileSpecs);
+ ({Target, FileSpecs}) ->
+ expand_file_specs(Target, FileSpecs)
+ end, filter_port_specs(Specs)).
expand_file_specs(Target, FileSpecs) ->
- Sources = lists:append([filelib:wildcard(FS) || FS <- FileSpecs]),
+ Sources = lists:flatmap(fun filelib:wildcard/1, FileSpecs),
[{Target, Src} || Src <- Sources].
filter_port_specs(Specs) ->
--
cgit v1.1