Index: openacs-4/packages/dotlrn/www/community-edit-revert.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-edit-revert.tcl,v diff -u -r1.6 -r1.7 --- openacs-4/packages/dotlrn/www/community-edit-revert.tcl 23 Oct 2002 12:38:39 -0000 1.6 +++ openacs-4/packages/dotlrn/www/community-edit-revert.tcl 13 Jan 2005 13:57:21 -0000 1.7 @@ -45,6 +45,13 @@ -community_id $community_id } +# either way, remove the logo from the CR +set parent_id [db_string get_root_folder {}] +set logo_name "community_logo_$community_id" +set item_id [db_string get_item_id "" -default ""] +if { ![empty_string_p $item_id] } { + db_exec_plsql delete_cr_item "" +} ad_returnredirect $referer