Index: library/mongodb/nx-mongo.tcl =================================================================== diff -u -rc85ca5808548fc506bfc39600bafb8b11ecfac43 -r8f4ba2af8b01697a3aab727a2794cb3b456d6632 --- library/mongodb/nx-mongo.tcl (.../nx-mongo.tcl) (revision c85ca5808548fc506bfc39600bafb8b11ecfac43) +++ library/mongodb/nx-mongo.tcl (.../nx-mongo.tcl) (revision 8f4ba2af8b01697a3aab727a2794cb3b456d6632) @@ -8,11 +8,14 @@ package provide nx::mongo 0.2 # todo: how to handle multiple connections; currently we have a single, global connection -# todo: make embedded, reference spec nicer # todo: all references are currently auto-fetched. make this optional +# todo: If "emebds" or "references" are used, the object must be of +# the specified classes, no subclasses allowed +# todo: extend the query language syntax, e.g. regexp, ... # todo: handle remove for non-multivalued embedded objects # idea: handle names of nx objects (e.g. attribute like __name) # idea: handle classes von nx objects (e.g. attribute like __class) +# todo: make "embedded", "reference" spec even nicer? namespace eval ::nx::mongo { @@ -307,6 +310,7 @@ # default slot class # :public method attribute {spec {-class ::nx::mongo::Attribute} {initblock ""}} { + regsub -all {,type=} $spec {,arg=} spec next [list $spec -class $class $initblock] }