Index: openacs-4/packages/xowiki/tcl/xowiki-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/xowiki-procs.tcl,v diff -u -r1.89 -r1.90 --- openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 11 Apr 2007 12:36:29 -0000 1.89 +++ openacs-4/packages/xowiki/tcl/xowiki-procs.tcl 17 Apr 2007 10:48:06 -0000 1.90 @@ -407,7 +407,9 @@ } #my log "--resolve --> $page" } - catch {$page set __decoration portlet} + if {$page ne "" && ![$page exists __decoration]} { + $page set __decoration portlet + } } if {$page ne ""} { @@ -893,6 +895,8 @@ if {[catch {$payload contains $cmd} error ]} { ns_log error "content $cmd lead to error: $error" } + #my log "call init mixins=[my info mixin]//[$payload info mixin]" + $payload init } Object instproc get_payload {var {default ""}} { set payload [self]::payload Index: openacs-4/packages/xowiki/www/prototypes/CGI2.page =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/prototypes/CGI2.page,v diff -u -r1.1 -r1.2 --- openacs-4/packages/xowiki/www/prototypes/CGI2.page 17 Aug 2006 01:44:27 -0000 1.1 +++ openacs-4/packages/xowiki/www/prototypes/CGI2.page 17 Apr 2007 10:48:05 -0000 1.2 @@ -3,7 +3,7 @@ ::xowiki::Object new -title "CGI2" -text { # # The classes and objects here are all local to the object, - # as long a no absolulte addresses are used (no leading colons) + # as long as no absolute class or object names are used (no leading colons) # Class CGI CGI instproc content {} { Index: openacs-4/packages/xowiki/www/prototypes/CGI3.page =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/www/prototypes/CGI3.page,v diff -u -r1.1 -r1.2 --- openacs-4/packages/xowiki/www/prototypes/CGI3.page 17 Aug 2006 01:44:27 -0000 1.1 +++ openacs-4/packages/xowiki/www/prototypes/CGI3.page 17 Apr 2007 10:48:05 -0000 1.2 @@ -16,7 +16,7 @@ # # The classes and objects here are all local to the object, - # as long a no absolulte addresses are used (no leading colons) + # as long as no absolute class or object names are used (no leading colons) # Class CGI