# HG changeset patch # User Matti Hamalainen # Date 1594120936 -10800 # Node ID a7e44605c93074ad64a702bdfd74814c3d446d3a # Parent 3046ee0e574d5c8ddf7aca056a38ce1a3cef4284 quotedb: Cleanup. diff -r 3046ee0e574d -r a7e44605c930 quotedb.tcl --- 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" } }