From e71ba958ce4fb3a68a37bd1d7799987a4b9d0c58 Mon Sep 17 00:00:00 2001 From: TheMarkitecht Date: Sun, 6 Oct 2024 12:42:06 -0500 Subject: [PATCH] Fix issue #314 Methods not memorized, ruins inheritance --- oo.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/oo.tcl b/oo.tcl index 4fefa9cc..99b2748d 100644 --- a/oo.tcl +++ b/oo.tcl @@ -73,7 +73,7 @@ proc class {classname {baseclasses {}} classvars} { proc "$classname classvars" {} classvars { return $classvars } proc "$classname classname" {} classname { return $classname } proc "$classname methods" {} classname { - lsort [lmap p [info commands "$classname *"] { + lsort [lmap p [info commands -all "$classname *"] { lindex [split $p " "] 1 }] }