Index: generic/predefined.xotcl
===================================================================
diff -u -r904066a25731aa8264c0e307dc3026b6ca17678c -r675e28583d105313f7fbc1dad66d2696c18b19f4
--- generic/predefined.xotcl	(.../predefined.xotcl)	(revision 904066a25731aa8264c0e307dc3026b6ca17678c)
+++ generic/predefined.xotcl	(.../predefined.xotcl)	(revision 675e28583d105313f7fbc1dad66d2696c18b19f4)
@@ -28,6 +28,11 @@
     puts stderr "use '[self] create $args', not '[self] $args'"
     eval my create $args
   }
+  Object method unknown {m args} {
+    if {![self isnext]} {
+      error "[self]: unable to dispatch method '$m'"
+    }
+  }
 
   # "init" must exist on Object. per default it is empty.
   Object method init args {}
@@ -175,6 +180,12 @@
   eval my create $args
 }
 
+::xotcl::Object method unknown {m args} {
+  if {![self isnext]} {
+    error "[self]: unable to dispatch method '$m'"
+  }
+}
+
 # "init" must exist on Object. per default it is empty.
 ::xotcl::Object method init args {}