Add prefix to logging
This commit is contained in:
parent
da24fc6b20
commit
08de047d91
|
@ -377,7 +377,11 @@ proc ::auto::runplugin {fn {_plugin ""} args} {
|
|||
} else {
|
||||
set call [list $rfn $args]
|
||||
}
|
||||
if {[catch {uplevel 1 {*}$call} msg]} {
|
||||
set ologprefix $::auto::logprefix
|
||||
set ::auto::logprefix "$plugin:$::auto::logprefix"
|
||||
set ret [catch {uplevel 1 {*}$call} msg]
|
||||
set ::auto::logprefix $ologprefix
|
||||
if {$ret} {
|
||||
log "$rfn: $msg" 0
|
||||
lassign [info stacktrace] p f l
|
||||
log " $f:$l @ $p" 0
|
||||
|
|
Loading…
Reference in New Issue