Handle hostnames with upper-case letters
[webmin.git] / fsdump / uninstall.pl
1 # uninstall.pl
2 # Called when webmin is uninstalled
3
4 require 'fsdump-lib.pl';
5
6 sub module_uninstall
7 {
8 &foreign_require("cron", "cron-lib.pl");
9 @jobs = &cron::list_cron_jobs();
10 foreach $j (sort { $b->{'line'} <=> $a->{'line'} } @jobs) {
11         if ($j->{'command'} =~ /^$cron_cmd\s+/) {
12                 # Cancel this cron job
13                 &cron::delete_cron_job($j);
14                 }
15         }
16 }
17
18 1;
19