瀏覽代碼

Update BT.Core.tcl

Daniel Voipan 5 年之前
父節點
當前提交
91b3916347
共有 1 個文件被更改,包括 3 次插入0 次删除
  1. 3 0
      BlackTools/BT.Core.tcl

+ 3 - 0
BlackTools/BT.Core.tcl

@@ -1760,6 +1760,9 @@ if {$laston == ""} {
 if {$user_time > $max_time} {
 	set counter [expr $counter + 1]
 	deluser $user
+	notes:remove:ondelete $user
+	alias:remove:ondelete $user
+	s:remove:ondelete $user
 	}
 }
 	blacktools:tell:dcc userexpire.1 "$counter"