Getting the FQN of a caller command
Posted to
tcl
by kostix at Fri Dec 01 19:20:29 GMT 2006
view raw
proc
get_caller {{level 1}} {
if
{[
info
level] < 3} {
return
{}
}
else
{
incr
level
uplevel
$level
{
namespace
which -command [
lindex
[
info
level 0] 0]}
}
}
Recent Posts
tcl by dandyn
2 days ago
tcl by dandyn
7 days ago
tcl by dandyn
15 days ago
tcl by greycat
32 days ago
tcl by DasBrain
34 days ago
tcl by DasBrain
39 days ago
tcl by kevin_walzer
42 days ago
tcl by Bradipo
49 days ago
tcl by Bradipo
53 days ago
tcl by Bradipo
53 days ago
Submit
New paste
Documentation
From Jabber