# HG changeset patch # User Matti Hamalainen # Date 1614078281 -7200 # Node ID a026f5eb94394524cc472ed660680cbbc253ad12 # Parent 88d0e2ba73ca960baac248abfd6ea12fa953e70e quotedb: Cleanup. diff -r 88d0e2ba73ca -r a026f5eb9439 quotedb.tcl --- a/quotedb.tcl Tue Feb 23 13:04:24 2021 +0200 +++ b/quotedb.tcl Tue Feb 23 13:04:41 2021 +0200 @@ -393,10 +393,10 @@ } ### Parse the given command - qdb_log "${unick}/${uhand}/${uchan} searched ${utable}: ${utext}" + qdb_log "${unick}/${uhand}/${uchan} searched ${utable}: '${utext}'" + set fpatlist {} set ftokens [::textutil::split::splitx $utext {\s+}] - set fpatlist {} foreach ftoken $ftokens { set fprefix [string range $ftoken 0 0] set fpattern [string range $ftoken 1 end]