diff utillib.tcl @ 604:543f1d72361e

utillib: Cleanup.
author Matti Hamalainen <ccr@tnsp.org>
date Thu, 04 Feb 2021 18:02:43 +0200
parents 76d19fa28753
children a5e83abb51a8
line wrap: on
line diff
--- a/utillib.tcl	Thu Feb 04 18:01:31 2021 +0200
+++ b/utillib.tcl	Thu Feb 04 18:02:43 2021 +0200
@@ -120,11 +120,11 @@
 
 
 # Return formatted time string for given UNIX timestamp
-proc utl_ctime {utime} {
-  if {$utime == "" || $utime == "*"} {
-    set utime 0
+proc utl_ctime {ustamp} {
+  if {$ustamp == "" || $ustamp == "*"} {
+    set ustamp 0
   }
-  return [clock format $utime -format "%d.%m.%Y %H:%M"]
+  return [clock format $ustamp -format "%d.%m.%Y %H:%M"]
 }