# Pastebin TUlUmWN5
   proc logme {text} {
      set fo [open $::daily::dlog a]
      puts $fo "\[[clock format [clock seconds] -format "%Y-%m-%d %H:%M:%S"]\] $text"
      close $fo
   }