chiark
/
gitweb
/
~mdw
/
ircbot
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Fixes.
[ircbot]
/
irccore.tcl
diff --git
a/irccore.tcl
b/irccore.tcl
index bdb8c8e7273a17d0c75d9732229602a33dcbd83e..d984906d913da0c0c23fc649b90f06803127f377 100644
(file)
--- a/
irccore.tcl
+++ b/
irccore.tcl
@@
-220,8
+220,9
@@
proc catch_restoreei {body} {
}
proc catch_logged {body} {
+ global errorInfo
if {[catch { uplevel 1 $body } emsg]} {
- logerror "error (catch_logged): $emsg"
+ logerror "error (catch_logged): $emsg
\n $errorInfo
"
}
}