######################################################################## # Method: delete_method # Use: deletes a method from the bucket # Created: 08/06/98 - MLN ######################################################################## sub delete_method { local($target) = $in{"target"}; require "$method_dir/delete_element.pl"; # to get &rm_element # for the moment, assume its a perl file &rm_element($method_dir,"$target.pl"); &http_header("text/plain"); print "method $target ($target_file) deleted\n"; &log("delete_method","OK","method $target ($target_file) deleted"); } 1;