ce2dfa8338
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@657 2a923420-c742-0410-a762-8d5b09965624
10 lines
138 B
Plaintext
10 lines
138 B
Plaintext
|
|
if {![exists -proc classdump]} {
|
|
proc classdump {o} {
|
|
foreach var [$o vars] {
|
|
puts [format {%20s %s} $var [$o get $var]]
|
|
}
|
|
}
|
|
}
|
|
|