Index: openacs-4/packages/xowiki/tcl/includelet-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowiki/tcl/includelet-procs.tcl,v diff -u -r1.205 -r1.206 --- openacs-4/packages/xowiki/tcl/includelet-procs.tcl 7 Sep 2017 15:51:10 -0000 1.205 +++ openacs-4/packages/xowiki/tcl/includelet-procs.tcl 11 Sep 2017 10:48:17 -0000 1.206 @@ -3890,7 +3890,7 @@ } foreach fn $field_names { if {[info exists __hidden($fn)]} continue - append cols [list AnchorField create _$fn \ + append cols [list AnchorField create $fn \ -label [$__ff($fn) label] \ -richtext 1 \ -orderby $fn \ @@ -4032,21 +4032,21 @@ # if {[info exists __ff($view_field)]} { # .... on $view_field) (per default: _name) .... - $__c set _$view_field.href $view_link + $__c set $view_field.href $view_link } else { # .... otherwise on the first form_field $__c set _[lindex $field_names 0].href $view_link } } # set always last_modified for default sorting - $__c set __last_modified [$p set last_modified] + $__c set _last_modified [$p set last_modified] foreach __fn $field_names { $__ff($__fn) object $p - $__c set _$__fn [$__ff($__fn) pretty_value [$p property $__fn]] + $__c set $__fn [$__ff($__fn) pretty_value [$p property $__fn]] } - $__c set __name [$package_id external_name -parent_id [$p parent_id] [$p name]] + $__c set _name [$package_id external_name -parent_id [$p parent_id] [$p name]] } #