Index: openacs-4/packages/simulation/lib/sim-objects.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/sim-objects.tcl,v diff -u -N -r1.13 -r1.13.2.1 --- openacs-4/packages/simulation/lib/sim-objects.tcl 29 Jan 2004 15:12:48 -0000 1.13 +++ openacs-4/packages/simulation/lib/sim-objects.tcl 30 Nov 2004 21:47:47 -0000 1.13.2.1 @@ -74,6 +74,11 @@ orderby r.title link_url_col view_url } + name { + label "URI" + orderby lower(i.name) + } + } #--------------------------------------------------------------------- @@ -120,7 +125,7 @@ Edit + width="16" border="0" alt="Delete"> } } @@ -167,6 +172,9 @@ set edit_p [expr $write_p || [permission::write_permission_p -object_id $item_id]] switch -glob $mime_type { + text/calendar - text/rtf { + set view_url [simulation::object::content_url -name $name] + } text/* - {} { set view_url [simulation::object::url -name $name] }