Index: TODO
===================================================================
diff -u -rfbd7f24c6111a5328c15bb7c47e9a45c9928357f -r3f398b58b5e8342bf3bed0e325e29b8c811ef7e2
--- TODO	(.../TODO)	(revision fbd7f24c6111a5328c15bb7c47e9a45c9928357f)
+++ TODO	(.../TODO)	(revision 3f398b58b5e8342bf3bed0e325e29b8c811ef7e2)
@@ -3798,10 +3798,13 @@
 
 nsf.c:
 - change argument of IsMetaClass() to type *NsfObject
-- provide basic pretection against most likely unintended 
+- provide basic protection against most likely unintended 
   deletion/overwriting of base classes.
 - extend regression test
 
+- fix typos
+- extend regression test to improve coverage
+
 ========================================================================
 TODO:
 
Index: tests/interceptor-slot.test
===================================================================
diff -u -rc4997e0189bb712287aa53d12bb3e332acfb781d -r3f398b58b5e8342bf3bed0e325e29b8c811ef7e2
--- tests/interceptor-slot.test	(.../interceptor-slot.test)	(revision c4997e0189bb712287aa53d12bb3e332acfb781d)
+++ tests/interceptor-slot.test	(.../interceptor-slot.test)	(revision 3f398b58b5e8342bf3bed0e325e29b8c811ef7e2)
@@ -154,7 +154,7 @@
 Test parameter count 3
 Test case "filter-and-creation" {
   Class create Foo {
-    :public method myfilter {args} {
+    :method myfilter {args} {
       set i [::incr ::count]
       set s [self]
       set m [current calledmethod]
@@ -204,6 +204,8 @@
   ? {ob2 bar2} {::ob2: unable to dispatch method 'bar2'}
   ? {ob2 baz} {}
 
+  # create with filter
+  ? {Foo create ob3 -filter myfilter} ::ob3
 }