changeset 610:a5c929a473ac

utillib: Check against validuser() in utl_valid_user() proc.
author Matti Hamalainen <ccr@tnsp.org>
date Tue, 09 Feb 2021 12:53:04 +0200
parents a5e83abb51a8
children 6f1d26814cc9
files utillib.tcl
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- 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
 }