Handle hostnames with upper-case letters
[webmin.git] / bacula-backup / sync.pl
1 #!/usr/local/bin/perl
2 # Update all node groups
3
4 $no_acl_check++;
5 require './bacula-backup-lib.pl';
6 exit if (!&has_node_groups());
7 $conf = &get_director_config();
8 $parent = &get_director_config_parent();
9 @nodegroups = &list_node_groups();
10
11 &lock_file($parent->{'file'});
12 foreach $nodegroup (@nodegroups) {
13         &sync_group_clients($nodegroup);
14         }
15 &flush_file_lines($parent->{'file'});
16 &unlock_file($parent->{'file'});
17