Mercurial > hg > egg-tcls
changeset 530:a7e44605c930
quotedb: Cleanup.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 07 Jul 2020 14:22:16 +0300 |
parents | 3046ee0e574d |
children | 137d61a0b5b7 |
files | quotedb.tcl |
diffstat | 1 files changed, 2 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/quotedb.tcl Tue Jul 07 14:22:06 2020 +0300 +++ b/quotedb.tcl Tue Jul 07 14:22:16 2020 +0300 @@ -41,12 +41,10 @@ #------------------------------------------------------------------------- -### Utility functions -proc qdb_log {jarg} { +proc qdb_log {arg} { global qdb_logmsg qdb_name - if {$qdb_logmsg != 0} { - putlog "$qdb_name: $jarg" + putlog "$qdb_name: $arg" } }