forum-disable.tcl

Disable a Forum

Location:
/packages/forums/www/admin/forum-disable.tcl
Author:
Ben Adida <ben@openforce.net>
Created:
2002-05-28
CVS ID:
$Id: forum-disable.tcl,v 1.9.2.2 2022/08/30 13:08:30 antoniop Exp $

Related Files

[ hide source ] | [ make this the default ]

File Contents

ad_page_contract {
    
    Disable a Forum

    @author Ben Adida (ben@openforce.net)
    @creation-date 2002-05-28
    @cvs-id $Id: forum-disable.tcl,v 1.9.2.2 2022/08/30 13:08:30 antoniop Exp $

} {
    forum_id:object_type(forums_forum),notnull
}

forum::disable -forum_id $forum_id

ad_returnredirect "."
ad_script_abort

# Local variables:
#    mode: tcl
#    tcl-indent-level: 4
#    indent-tabs-mode: nil
# End: