Add files via upload

BlackTools/Modules/BT.AutoUpdate.tcl

@@ -296,7 +296,7 @@ proc blacktools:update_start_download {hand chan new_version last_modify} {
     ::github::github update tclscripts BlackTools-TCL $black(actdir)
     blacktools:every 1000 {
 if {[file isdirectory $black(actdir)/BlackTools]} {
-    set size [blacktools:size "$black(actdir)/BlackTools"]
+    set size [llength [glob-r "$black(actdir)/BlackTools"]]
 if {$size == $black(current_size)} {
     blacktools:update_start_restore
     break