X-Git-Url: http://git.rot13.org/?p=BackupPC.git;a=blobdiff_plain;f=bin%2FBackupPC_ASA_ArchiveStart;h=da3ef770c7b3ade765b063bf48da195b502fcdee;hp=f91a60f6078a035cf7edae468f771c67e783a832;hb=4271e4fc3abee4aaa0326cf76d3dc9ad36a3ffe4;hpb=62919ede1310e6be4751ac7e14770b33e4765d2d

diff --git a/bin/BackupPC_ASA_ArchiveStart b/bin/BackupPC_ASA_ArchiveStart
index f91a60f..da3ef77 100755
--- a/bin/BackupPC_ASA_ArchiveStart
+++ b/bin/BackupPC_ASA_ArchiveStart
@@ -100,6 +100,7 @@ my(@HostList, @BackupList);
 my $host_nums;
 
 foreach my $host ( keys %$Hosts ) {
+	$host = lc $host;
 	my @backups = $bpc->BackupInfoRead($host);
 	if ( !@backups ) {
 		warn "$0: host $host doesn't have any backups... skipping\n";