Slight test change

2010-10-15 10:54:34 +04:00
parent d6dddd6aca
commit 78944481d7
1 changed files with 1 additions and 1 deletions
--- a/test/sqlite3_test.erl
+++ b/test/sqlite3_test.erl
@@ -78,7 +78,7 @@ select_many_records_test() ->
 	sqlite3:open(ct),
 	drop_table_if_exists(ct, many_records),
    sqlite3:create_table(ct, many_records, [{id, integer}, {name, text}]),
-	lists:foreach(fun(X) -> sqlite3:write(ct, many_records, [{id, X}, {name, "bar"}]) end, lists:seq(1, 1024)),
+	[sqlite3:write(ct, many_records, [{id, X}, {name, "bar"}]) || X <- Seq],
 	Columns = ["id", "name"],
    ?assertEqual(
        [{columns, Columns}, {rows, [{1, <<"bar">>}]}],