From 80d685fc9abd7774608c0f0886c7e0d90c3beaa0 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sun, 6 Feb 2011 11:31:20 +0100
Subject: [PATCH] lowercase (lc) hostname to get increments

---
 bin/BackupPC_ASA_SearchUpdate | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/bin/BackupPC_ASA_SearchUpdate b/bin/BackupPC_ASA_SearchUpdate
index de465b7..4d46a4c 100755
--- a/bin/BackupPC_ASA_SearchUpdate
+++ b/bin/BackupPC_ASA_SearchUpdate
@@ -312,8 +312,9 @@ my $host_nr = 0;
 foreach my $host_key (@hosts) {
 
 	my $hostname = $hosts->{$host_key}->{'host'} || die "can't find host for $host_key";
+	$hostname = lc $hostname;
 
-	next if $opt->host && ! grep { m/^$hostname$/ } @{ $opt->host };
+	next if $opt->host && ! grep { m/^$hostname$/i } @{ $opt->host };
 
 	$sth->{hosts_by_name}->execute($hostname);
 
-- 
2.20.1