Update BT.Core.tcl

BlackTools/BT.Core.tcl

@@ -22,7 +22,7 @@ set black(glflags) "nmo"
 set black(tclconfig) "$black(backdir)/$black(tclname)"
 set black(tempdir) "$black(backdir)/BlackTools/temp"
 set black(banflag) "B"
-set black(current_modif) "1618162992"
+set black(current_modif) "1731416667"
 
 ############################### Information files ############################