diff options
| author | N.N. <matju@users.sourceforge.net> | 2009-06-01 00:43:15 +0000 |
|---|---|---|
| committer | N.N. <matju@users.sourceforge.net> | 2009-06-01 00:43:15 +0000 |
| commit | ce81f78669ca67c8bde4cfa6a2026b6e5fc0547f (patch) | |
| tree | 70db806415d7e4a54b51e1186f732b33520b6488 | |
| parent | d1f6ad58673aab95228074df47094c4e52c758d8 (diff) | |
clean
svn path=/trunk/; revision=11597
| -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(*:*)]) |