Mini Shell
Mini Shell
| Direktori : /usr/share/webmin/samba/ |
| Current File : //usr/share/webmin/samba/logout.cgi |
#!/usr/bin/perl
# logout.cgi
# Forget the current SWAT login and password
require './samba-lib.pl';
# check acls
&error_setup("$text{'eacl_aviol'}ask_epass.cgi");
&error("$text{'eacl_np'} $text{'eacl_pcswat'}") unless $access{'swat'};
unlink("$module_config_directory/swat");
&redirect("swat.cgi");