Mercurial > hg > egg-tcls
diff utillib.tcl @ 424:825cac46b1cb
Cosmetic / stray trailing whitespace cleanup.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Sun, 08 Jan 2017 03:55:55 +0200 |
| parents | 880a07485275 |
| children | 84d3d7abeb8a |
line wrap: on
line diff
--- a/utillib.tcl Sun Jan 08 03:52:40 2017 +0200 +++ b/utillib.tcl Sun Jan 08 03:55:55 2017 +0200 @@ -27,7 +27,7 @@ proc utl_str_split {str maxlen} { - set pos 0 + set pos 0 set len [string length $str] set ulen 0 set ustr "" @@ -76,7 +76,7 @@ ### proc utl_tdbc_sql_init {ndb_handle db_type db_name db_host db_port db_user db_pass} { upvar $ndb_handle udb_handle - + if {$db_type == "sqlite"} { if {$db_name == ""} { putlog " SQLite3 database file not set."