Index: openacs-4/packages/acs-subsite/www/admin/relations/one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/relations/one.tcl,v diff -u -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/acs-subsite/www/admin/relations/one.tcl 18 Sep 2015 07:27:48 -0000 1.4.2.2 +++ openacs-4/packages/acs-subsite/www/admin/relations/one.tcl 28 Oct 2015 09:38:38 -0000 1.4.2.3 @@ -45,18 +45,7 @@ set subsite_group_id [application_group::group_id_from_package_id] -if { ![db_0or1row select_rel_info { - select r.rel_type, acs_object_type.pretty_name(t.rel_type) as rel_type_pretty_name, - acs_rel_type.role_pretty_name(t.role_one) as role_one_pretty_name, - acs_rel_type.role_pretty_name(t.role_two) as role_two_pretty_name, - t.object_type_two as object_type_two, - acs_object.name(r.object_id_one) as object_id_one_name, - r.object_id_one, - acs_object.name(r.object_id_two) as object_id_two_name, - r.object_id_two - from acs_rels r, acs_rel_types t - where r.rel_id = :rel_id - and r.rel_type = t.rel_type} -column_array rel] +if { ![db_0or1row select_rel_info {} -column_array rel] } { ad_return_error "Error" "Relation #rel_id does not exist" ad_script_abort