exists -proc -> exists -command
`exists -command` subsumes `exists -proc` This test is generally checking whether the command exists, rather than some proc that is overriding it. Currently `class` is a proc but this may not always be so.
This commit is contained in:
parent
d7c15163e1
commit
b780b3dda8
|
@ -2,7 +2,7 @@
|
|||
# From https://wiki.tcl-lang.org/page/Parsing+XML
|
||||
# Keith Vetter 2004-03-01
|
||||
|
||||
if {![exists -proc class]} { package require oo }
|
||||
if {![exists -command class]} { package require oo }
|
||||
|
||||
class xml {
|
||||
xml ""
|
||||
|
|
Loading…
Reference in New Issue