Index: doc/index.html
===================================================================
diff -u -rf3d0bcae1ec627cfe5a7a6512d7e6b213359b72f -r261afd3f6e91b27144e6614a535518bbec6d5cde
--- doc/index.html	(.../index.html)	(revision f3d0bcae1ec627cfe5a7a6512d7e6b213359b72f)
+++ doc/index.html	(.../index.html)	(revision 261afd3f6e91b27144e6614a535518bbec6d5cde)
@@ -23,7 +23,7 @@
 </center>
 
   <ul>
-    <li> <b>Directory './library/lib': </b><br><a HREF="./Script-xotcl.html">Script.xotcl</a>, <a HREF="./htmllib-xotcl.html">htmllib.xotcl</a>, <a HREF="./make-xotcl.html">make.xotcl</a>, <a HREF="./makeDoc-xotcl.html">makeDoc.xotcl</a>, <a HREF="./metadataAnalyzer-xotcl.html">metadataAnalyzer.xotcl</a>, <a HREF="./mixinStrategy-xotcl.html">mixinStrategy.xotcl</a>, <a HREF="./package-xotcl.html">package.xotcl</a>, <a HREF="./staticMetadata-xotcl.html">staticMetadata.xotcl</a>, <a HREF="./test-xotcl.html">test.xotcl</a>, <a HREF="./trace-xotcl.html">trace.xotcl</a>, <a HREF="./upvarcompat-xotcl.html">upvarcompat.xotcl</a>, <a HREF="./xodoc-xotcl.html">xodoc.xotcl</a>, <a HREF="./xotcl1-xotcl.html">xotcl1.xotcl</a><li> <b>Directory './library/store': </b><br><a HREF="./JufGdbmStorage-xotcl.html">JufGdbmStorage.xotcl</a>, <a HREF="./MemStorage-xotcl.html">MemStorage.xotcl</a>, <a HREF="./MultiStorage-xotcl.html">MultiStorage.xotcl</a>, <a HREF="./Persistence-xotcl.html">Persistence.xotcl</a>, <a HREF="./Storage-xotcl.html">Storage.xotcl</a>, <a HREF="./TclGdbmStorage-xotcl.html">TclGdbmStorage.xotcl</a>, <a HREF="./TextFileStorage-xotcl.html">TextFileStorage.xotcl</a>, <a HREF="./persistenceExample-xotcl.html">persistenceExample.xotcl</a><li> <b>Directory './library/serialize': </b><br><a HREF="./Serializer-xotcl.html">Serializer.xotcl</a><li> <b>Directory './tests': </b><br><a HREF="./12-xotcl.html">12.xotcl</a>, <a HREF="./aliastest-xotcl.html">aliastest.xotcl</a>, <a HREF="./destroytest-xotcl.html">destroytest.xotcl</a>, <a HREF="./forwardtest-xotcl.html">forwardtest.xotcl</a>, <a HREF="./info-method-xotcl.html">info-method.xotcl</a>, <a HREF="./interceptor-slot-xotcl.html">interceptor-slot.xotcl</a>, <a HREF="./method-modifiers-xotcl.html">method-modifiers.xotcl</a>, <a HREF="./mix-xotcl.html">mix.xotcl</a>, <a HREF="./mixinoftest-xotcl.html">mixinoftest.xotcl</a>, <a HREF="./o2-xotcl.html">o2.xotcl</a>, <a HREF="./object-system-xotcl.html">object-system.xotcl</a>, <a HREF="./parameters-xotcl.html">parameters.xotcl</a>, <a HREF="./protected-xotcl.html">protected.xotcl</a>, <a HREF="./slottest-xotcl.html">slottest.xotcl</a>, <a HREF="./speedtest-xotcl.html">speedtest.xotcl</a>, <a HREF="./stack-xotcl.html">stack.xotcl</a>, <a HREF="./testo-xotcl.html">testo.xotcl</a>, <a HREF="./testx-xotcl.html">testx.xotcl</a>, <a HREF="./var-xotcl.html">var.xotcl</a>, <a HREF="./varresolutiontest-xotcl.html">varresolutiontest.xotcl</a><li> <b>Directory './apps/scripts': </b><br><a HREF="./adapter-xotcl.html">adapter.xotcl</a>, <a HREF="./adapterExample-xotcl.html">adapterExample.xotcl</a>, <a HREF="./composite-xotcl.html">composite.xotcl</a>, <a HREF="./compositeExample-xotcl.html">compositeExample.xotcl</a>, <a HREF="./observer-xotcl.html">observer.xotcl</a>, <a HREF="./parameter-xotcl.html">parameter.xotcl</a>, <a HREF="./pinger-xotcl.html">pinger.xotcl</a>, <a HREF="./simpleFilters-xotcl.html">simpleFilters.xotcl</a>, <a HREF="./soccerClub-xotcl.html">soccerClub.xotcl</a>, <a HREF="./soccerClub2-xotcl.html">soccerClub2.xotcl</a><li> <b>Directory './apps/comm': </b><br><a HREF="./ftp-xotcl.html">ftp.xotcl</a>, <a HREF="./link-checker-xotcl.html">link-checker.xotcl</a>, <a HREF="./secure-webclient-xotcl.html">secure-webclient.xotcl</a>, <a HREF="./secure-webserver-xotcl.html">secure-webserver.xotcl</a>, <a HREF="./webclient-xotcl.html">webclient.xotcl</a>, <a HREF="./webserver-xotcl.html">webserver.xotcl</a><li> <b>Directory './apps/actiweb/univ': </b><br><a HREF="./UNIVERSAL-xotcl.html">UNIVERSAL.xotcl</a><li> <b>Directory './apps/utils': </b><br><a HREF="./xo-daemon.html">xo-daemon</a>, <a HREF="./xo-whichPkg.html">xo-whichPkg</a>
+    <li> <b>Directory './library/lib': </b><br><a HREF="./Script-xotcl.html">Script.xotcl</a>, <a HREF="./htmllib-xotcl.html">htmllib.xotcl</a>, <a HREF="./make-xotcl.html">make.xotcl</a>, <a HREF="./makeDoc-xotcl.html">makeDoc.xotcl</a>, <a HREF="./metadataAnalyzer-xotcl.html">metadataAnalyzer.xotcl</a>, <a HREF="./mixinStrategy-xotcl.html">mixinStrategy.xotcl</a>, <a HREF="./package-xotcl.html">package.xotcl</a>, <a HREF="./staticMetadata-xotcl.html">staticMetadata.xotcl</a>, <a HREF="./test-xotcl.html">test.xotcl</a>, <a HREF="./trace-xotcl.html">trace.xotcl</a>, <a HREF="./upvarcompat-xotcl.html">upvarcompat.xotcl</a>, <a HREF="./xodoc-xotcl.html">xodoc.xotcl</a>, <a HREF="./xotcl1-xotcl.html">xotcl1.xotcl</a><li> <b>Directory './library/store': </b><br><a HREF="./JufGdbmStorage-xotcl.html">JufGdbmStorage.xotcl</a>, <a HREF="./MemStorage-xotcl.html">MemStorage.xotcl</a>, <a HREF="./MultiStorage-xotcl.html">MultiStorage.xotcl</a>, <a HREF="./Persistence-xotcl.html">Persistence.xotcl</a>, <a HREF="./Storage-xotcl.html">Storage.xotcl</a>, <a HREF="./TclGdbmStorage-xotcl.html">TclGdbmStorage.xotcl</a>, <a HREF="./TextFileStorage-xotcl.html">TextFileStorage.xotcl</a>, <a HREF="./persistenceExample-xotcl.html">persistenceExample.xotcl</a><li> <b>Directory './library/serialize': </b><br><a HREF="./Serializer-xotcl.html">Serializer.xotcl</a><li> <b>Directory './tests': </b><br><a HREF="./12-xotcl.html">12.xotcl</a>, <a HREF="./aliastest-xotcl.html">aliastest.xotcl</a>, <a HREF="./destroytest-xotcl.html">destroytest.xotcl</a>, <a HREF="./forwardtest-xotcl.html">forwardtest.xotcl</a>, <a HREF="./info-method-xotcl.html">info-method.xotcl</a>, <a HREF="./interceptor-slot-xotcl.html">interceptor-slot.xotcl</a>, <a HREF="./method-modifiers-xotcl.html">method-modifiers.xotcl</a>, <a HREF="./mix-xotcl.html">mix.xotcl</a>, <a HREF="./mixinoftest-xotcl.html">mixinoftest.xotcl</a>, <a HREF="./o2-xotcl.html">o2.xotcl</a>, <a HREF="./object-system-xotcl.html">object-system.xotcl</a>, <a HREF="./parameters-xotcl.html">parameters.xotcl</a>, <a HREF="./protected-xotcl.html">protected.xotcl</a>, <a HREF="./slottest-xotcl.html">slottest.xotcl</a>, <a HREF="./speedtest-xotcl.html">speedtest.xotcl</a>, <a HREF="./stack-xotcl.html">stack.xotcl</a>, <a HREF="./testo-xotcl.html">testo.xotcl</a>, <a HREF="./testx-xotcl.html">testx.xotcl</a>, <a HREF="./varresolutiontest-xotcl.html">varresolutiontest.xotcl</a>, <a HREF="./varresolutiontest1-xotcl.html">varresolutiontest1.xotcl</a><li> <b>Directory './apps/scripts': </b><br><a HREF="./adapter-xotcl.html">adapter.xotcl</a>, <a HREF="./adapterExample-xotcl.html">adapterExample.xotcl</a>, <a HREF="./composite-xotcl.html">composite.xotcl</a>, <a HREF="./compositeExample-xotcl.html">compositeExample.xotcl</a>, <a HREF="./observer-xotcl.html">observer.xotcl</a>, <a HREF="./parameter-xotcl.html">parameter.xotcl</a>, <a HREF="./pinger-xotcl.html">pinger.xotcl</a>, <a HREF="./simpleFilters-xotcl.html">simpleFilters.xotcl</a>, <a HREF="./soccerClub-xotcl.html">soccerClub.xotcl</a>, <a HREF="./soccerClub2-xotcl.html">soccerClub2.xotcl</a><li> <b>Directory './apps/comm': </b><br><a HREF="./ftp-xotcl.html">ftp.xotcl</a>, <a HREF="./link-checker-xotcl.html">link-checker.xotcl</a>, <a HREF="./secure-webclient-xotcl.html">secure-webclient.xotcl</a>, <a HREF="./secure-webserver-xotcl.html">secure-webserver.xotcl</a>, <a HREF="./webclient-xotcl.html">webclient.xotcl</a>, <a HREF="./webserver-xotcl.html">webserver.xotcl</a><li> <b>Directory './apps/actiweb/univ': </b><br><a HREF="./UNIVERSAL-xotcl.html">UNIVERSAL.xotcl</a><li> <b>Directory './apps/utils': </b><br><a HREF="./xo-daemon.html">xo-daemon</a>, <a HREF="./xo-whichPkg.html">xo-whichPkg</a>
   </ul>
   <p>
 
Index: generic/gentclAPI.decls
===================================================================
diff -u -r25b538dc2ef31223ad89edf12c3f6e60201049a8 -r261afd3f6e91b27144e6614a535518bbec6d5cde
--- generic/gentclAPI.decls	(.../gentclAPI.decls)	(revision 25b538dc2ef31223ad89edf12c3f6e60201049a8)
+++ generic/gentclAPI.decls	(.../gentclAPI.decls)	(revision 261afd3f6e91b27144e6614a535518bbec6d5cde)
@@ -140,7 +140,7 @@
 }
 xotclCmd self XOTclSelfCmd {
   {-argName "selfoption" -required 0 -type "proc|method|object|class|activelevel|args|activemixin|calledproc|calledmethod|calledclass|callingproc|callingmethod|callingclass|callinglevel|callingobject|filterreg|isnextcall|next"}
-}
+} 
 xotclCmd setvar XOTclSetVarCmd {
   {-argName "object" -required 1 -type object}
   {-argName "variable" -required 1 -type tclobj}
Index: generic/predefined.h
===================================================================
diff -u -r199681097494e7dbacc4e1cc368638a058fec73d -r261afd3f6e91b27144e6614a535518bbec6d5cde
--- generic/predefined.h	(.../predefined.h)	(revision 199681097494e7dbacc4e1cc368638a058fec73d)
+++ generic/predefined.h	(.../predefined.h)	(revision 261afd3f6e91b27144e6614a535518bbec6d5cde)
@@ -91,14 +91,10 @@
 "{*}[expr {${objscope} ? \"-objscope\" : \"\"}] \\\n"
 "{*}[expr {${nonleaf} ? \"-nonleaf\" : \"\"}] \\\n"
 "$cmd}\n"
-"Object public method setter {methodName value:optional} {\n"
-"if {[info exists value]} {\n"
-"::xotcl::setter [::xotcl::current object] -per-object $methodName $value} else {\n"
-"::xotcl::setter [::xotcl::current object] -per-object $methodName}}\n"
-"Class public method setter {methodName value:optional} {\n"
-"if {[info exists value]} {\n"
-"::xotcl::setter [::xotcl::current object] $methodName $value} else {\n"
-"::xotcl::setter [::xotcl::current object] $methodName}}\n"
+"Object public method setter {methodName} {\n"
+"::xotcl::setter [::xotcl::current object] -per-object $methodName}\n"
+"Class public method setter {methodName} {\n"
+"::xotcl::setter [::xotcl::current object] $methodName}\n"
 "Object create ::xotcl2::objectInfo\n"
 "Object create ::xotcl2::classInfo\n"
 "objectInfo eval {\n"
Index: generic/predefined.xotcl
===================================================================
diff -u -r199681097494e7dbacc4e1cc368638a058fec73d -r261afd3f6e91b27144e6614a535518bbec6d5cde
--- generic/predefined.xotcl	(.../predefined.xotcl)	(revision 199681097494e7dbacc4e1cc368638a058fec73d)
+++ generic/predefined.xotcl	(.../predefined.xotcl)	(revision 261afd3f6e91b27144e6614a535518bbec6d5cde)
@@ -178,19 +178,11 @@
 
   # Add setter methods. 
   #  
-  Object public method setter {methodName value:optional} {
-    if {[info exists value]} {
-      ::xotcl::setter [::xotcl::current object] -per-object $methodName $value
-    } else {
-      ::xotcl::setter [::xotcl::current object] -per-object $methodName
-    }
+  Object public method setter {methodName} {
+    ::xotcl::setter [::xotcl::current object] -per-object $methodName
   }
-  Class public method setter {methodName value:optional} {
-    if {[info exists value]} {
-      ::xotcl::setter [::xotcl::current object] $methodName $value
-    } else {
-      ::xotcl::setter [::xotcl::current object] $methodName
-    }
+  Class public method setter {methodName} {
+    ::xotcl::setter [::xotcl::current object] $methodName
   }
 
   ########################