cron/uninstall.pl

   1
   2 require 'cron-lib.pl';
   3
   4 sub module_uninstall
   5 {
   6 # Remove the cron job to delete old files in /tmp/.webmin
   7 eval {
   8         $main::error_must_die = 1;
   9         local @jobs = &cron::list_cron_jobs();
  10         local ($job) = grep { $_->{'user'} eq 'root' &&
  11                               $_->{'command'} eq $temp_delete_cmd } @jobs;
  12         if ($job) {
  13                 &delete_cron_job($job);
  14                 }
  15         };
  16 if ($@) {
  17         print STDERR "Failed to remove /tmp cleanup cron job : $@\n";
  18         }
  19 }
  20
  21