changeset 653:96a659f66be9

quotedb: Use splitx instead of split.
author Matti Hamalainen <ccr@tnsp.org>
date Wed, 17 Feb 2021 11:09:50 +0200
parents aa317575410d
children 10ea2c1101b3
files quotedb.tcl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/quotedb.tcl	Wed Feb 17 11:05:20 2021 +0200
+++ b/quotedb.tcl	Wed Feb 17 11:09:50 2021 +0200
@@ -395,7 +395,7 @@
   ### Parse the given command
   qdb_log "${unick}/${uhand}/${uchan} searched ${utable}: ${utext}"
 
-  set ftokens [split $utext " "]
+  set ftokens [::textutil::split::splitx $utext {\s+}]
   set fpatlist {}
   foreach ftoken $ftokens {
     set fprefix [string range $ftoken 0 0]