# HG changeset patch
# User Matti Hamalainen <ccr@tnsp.org>
# Date 1612867984 -7200
# Node ID a5c929a473acf7d200aaf151219c2a7597c7691d
# Parent  a5e83abb51a89eec49ccd60de91193b697040521
utillib: Check against validuser() in utl_valid_user() proc.

diff -r a5e83abb51a8 -r a5c929a473ac utillib.tcl
--- a/utillib.tcl	Tue Feb 09 00:13:42 2021 +0200
+++ b/utillib.tcl	Tue Feb 09 12:53:04 2021 +0200
@@ -72,7 +72,7 @@
 
 proc utl_valid_user {uhand} {
   if {$uhand != "" && $uhand != "{}" && $uhand != "*"} {
-    return 1
+    return [validuser $uhand]
   }
   return 0
 }