From e3676f4a6b0ec8d504034d53c1546a6fbf78fe4e Mon Sep 17 00:00:00 2001
From: Ulf Wiger <ulf@feuerlabs.com>
Date: Thu, 16 Aug 2012 13:55:14 +0200
Subject: [PATCH] lists:concat() -> lists:append()

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

diff --git a/src/exprecs.erl b/src/exprecs.erl
index 8d55eb0..cd71a19 100755
--- a/src/exprecs.erl
+++ b/src/exprecs.erl
@@ -611,7 +611,7 @@ generate_accessors(L, Acc) ->
        f_get(Acc, L),
        f_set(Acc, L),
        f_fromlist(Acc, L) |
-       lists:concat(
+       lists:append(
 	 lists:map(
 	   fun(Rname) ->
 		   Fields = get_flds(Rname, Acc),
@@ -1029,7 +1029,7 @@ f_isrec_1(Acc, L) ->
 f_get(#pass1{record_types = RTypes, exports = Es} = Acc, L) ->
     Fname = list_to_atom(fname_prefix(get, Acc)),
     [funspec(L, Fname,
-	     lists:concat(
+	     lists:append(
 	       [[{[t_atom(L, A), t_record(L, R)], T}
 		 || {A, T} <- Types]
 		|| {R, Types} <- RTypes, lists:member(R, Es)])