From fe5fd4c7f549c5050c56b409b917e7cdd68d00c9 Mon Sep 17 00:00:00 2001 From: Alexey Romanov Date: Fri, 24 Feb 2012 17:16:07 +0400 Subject: [PATCH] Removed unneeded abbreviation --- src/sqlite3_lib.erl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/sqlite3_lib.erl b/src/sqlite3_lib.erl index 8a91c33..8c52ba4 100644 --- a/src/sqlite3_lib.erl +++ b/src/sqlite3_lib.erl @@ -205,7 +205,7 @@ read_cols_sql(Columns) -> %%-------------------------------------------------------------------- -spec create_table_sql(table_id(), table_info()) -> iolist(). create_table_sql(Tbl, Columns) -> - {Type, TName} = encode_tbl(Tbl), + {Type, TName} = encode_table_id(Tbl), ["CREATE TABLE ", TName, " (", map_intersperse(fun column_sql_for_create_table/1, Columns, ", "), ", CHECK ('", Type, "'='", Type, "'));"]. @@ -223,7 +223,7 @@ create_table_sql(Tbl, Columns) -> %%-------------------------------------------------------------------- -spec create_table_sql(table_id(), table_info(), table_constraints()) -> iolist(). create_table_sql(Tbl, Columns, TblConstraints) -> - {Type, TName} = encode_tbl(Tbl), + {Type, TName} = encode_table_id(Tbl), ["CREATE TABLE ", TName, " (", map_intersperse(fun column_sql_for_create_table/1, Columns, ", "), ", ", table_constraint_sql(TblConstraints), @@ -243,7 +243,7 @@ create_table_sql(Tbl, Columns, TblConstraints) -> %%-------------------------------------------------------------------- -spec update_sql(table_id(), column_id(), sql_value(), [{column_id(), sql_value()}]) -> iolist(). update_sql(Tbl, Key, Value, Data) -> - {_, TName} = encode_tbl(Tbl), + {_, TName} = encode_table_id(Tbl), ["UPDATE ", TName, " SET ", update_set_sql(Data), " WHERE ", to_iolist(Key), " = ", value_to_sql(Value), ";"]. @@ -425,11 +425,11 @@ indexed_column_sql({ColumnName, desc}) -> [atom_to_list(ColumnName), " DESC"]; indexed_column_sql(ColumnName) -> atom_to_list(ColumnName). -encode_tbl(A) when is_atom(A) -> +encode_table_id(A) when is_atom(A) -> {"am", atom_to_list(A)}; -encode_tbl(B) when is_binary(B) -> +encode_table_id(B) when is_binary(B) -> {"bin", B}; -encode_tbl(L) when is_list(L) -> +encode_table_id(L) when is_list(L) -> {"lst", L}. to_iolist(A) when is_atom(A) ->