remove dbg message

This commit is contained in:
stefan schippers 2023-11-04 15:07:09 +01:00
parent 7022fbf073
commit 4be10f1707
1 changed files with 0 additions and 2 deletions

View File

@ -267,9 +267,7 @@ proc execute_fileevent {id} {
if {$report} {viewdata "Completed: $execute(cmd,$id)\ndata:\n$execute(data,$id)"}
}
if {[info exists execute(callback,$id)] && $execute(callback,$id) ne {}} {
puts $execute(callback,$id)
uplevel #0 eval $execute(callback,$id)
}
catch {unset execute(callback,$id)}
set execute(cmd,last) $execute(cmd,$id)