diff options
Diffstat (limited to 'desiredata/src/poe.tcl')
| -rw-r--r-- | desiredata/src/poe.tcl | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/desiredata/src/poe.tcl b/desiredata/src/poe.tcl index aa6f463a..22c72d3f 100644 --- a/desiredata/src/poe.tcl +++ b/desiredata/src/poe.tcl @@ -70,7 +70,6 @@ proc def {self selector argnames body} { global _ __trace __args if {![info exists _($self:_class)]} {error "unknown class '$self'"} set name ${self}_$selector - #if {$name == "Canvas_motion_wrap"} {set body "puts \[time {$body}\]"} set argnames [concat [list self] $argnames] if {([info exists __trace($self:$selector)] || [info exists __trace(*:$selector)] || [info exists __trace($self:*)] || [info exists __trace(*:*)]) |