Update BT.Core.tcl

BlackTools/BT.Core.tcl

@@ -23,7 +23,6 @@ set black(tclconfig) "$black(backdir)/$black(tclname)"
 set black(tempdir) "$black(backdir)/BlackTools/temp"
 set black(banflag) "B"
 set black(current_modif) "1615556948"
-set black(current_size) "76"
 
 ############################### Information files ############################