cluster-software/closeall.cgi

   1 #!/usr/local/bin/perl
   2 # closeall.cgi
   3 # Empty the open list
   4
   5 require './cluster-software-lib.pl';
   6 &ReadParse();
   7 &save_heiropen([ ], $in{'id'});
   8 &redirect("edit_host.cgi?id=$in{'id'}");
   9