Mercurial > hg > egg-tcls
comparison utillib.tcl @ 542:a57822226ba0
utillib: Rename utl_tdbc_sql_init to utl_sql_init.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 07 Jul 2020 23:17:02 +0300 |
parents | c9dc79874939 |
children | 2a1f3e0f0977 |
comparison
equal
deleted
inserted
replaced
541:8e02d736bcc3 | 542:a57822226ba0 |
---|---|
127 | 127 |
128 | 128 |
129 ### | 129 ### |
130 ### SQL database handling | 130 ### SQL database handling |
131 ### | 131 ### |
132 proc utl_tdbc_sql_init {ndb_handle db_type db_name db_host db_port db_user db_pass} { | 132 proc utl_sql_init {ndb_handle db_type db_name db_host db_port db_user db_pass} { |
133 upvar $ndb_handle udb_handle | 133 upvar $ndb_handle udb_handle |
134 | 134 |
135 if {$db_type == "sqlite"} { | 135 if {$db_type == "sqlite"} { |
136 if {$db_name == ""} { | 136 if {$db_name == ""} { |
137 putlog " SQLite3 database file not set." | 137 putlog " SQLite3 database file not set." |