Index: openacs-4/packages/general-comments/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/general-comments/www/index.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/general-comments/www/index.tcl 27 Jun 2015 21:10:12 -0000 1.9 +++ openacs-4/packages/general-comments/www/index.tcl 7 Aug 2017 23:48:12 -0000 1.10 @@ -8,7 +8,7 @@ @creation-date 2000-10-12 @cvs-id $Id$ } -query { - {orderby:optional} + {orderby:token,optional} {approval "any"} {modified "any"} } -properties { @@ -29,6 +29,7 @@ # this page with the proper parameters set return_url [ns_urlencode index?[export_ns_set_vars url]] +set user_name [person::name -person_id $user_id] set dimensional [list \ [list approval "[_ general-comments.Status]" any [list \ @@ -91,3 +92,9 @@ ad_return_template + +# Local variables: +# mode: tcl +# tcl-indent-level: 4 +# indent-tabs-mode: nil +# End: