toggle.tcl

Toggle the server status

Location:

/packages/xml-rpc/www/admin/toggle.tcl

Author:

Vinod Kurup [vinod@kurup.com]

Created:

Sat Oct 11 01:10:06 2003

CVS ID:

$Id: toggle.tcl,v 1.1 2003/11/26 02:59:14 vinodk Exp $

Related Files

• packages/xml-rpc/www/admin/toggle.tcl

[ hide source ] | [ make this the default ]

File Contents

# /packages/xml-rpc/www/admin/toggle.tcl
ad_page_contract {
     Toggle the server status
     @author Vinod Kurup [vinod@kurup.com]
     @creation-date Sat Oct 11 01:10:06 2003
     @cvs-id $Id: toggle.tcl,v 1.1 2003/11/26 02:59:14 vinodk Exp $
} {
}

parameter::set_from_package_key \
    -package_key xml-rpc \
    -parameter EnableXMLRPCServer \
    -value [string is false [xmlrpc::enabled_p]]

ad_returnredirect ./