@@ -290,12 +290,12 @@
 			} elseif {[string match $limitos $arch_os]} {
 				set isCompatOS 1
 			} else {
 				foreach {teapot localvariants} [array get osTeapotToLocal] {
 					foreach local $localvariants {
-						if {[string match $limitos $local] || [string match $local $limitos]} {
-							if {[string match $teapot $arch_os] || [string match $arch_os $teapot]} {
+						if {[string match -nocase $limitos $local] || [string match -nocase $local $limitos]} {
+							if {[string match -nocase $teapot $arch_os] || [string match -nocase $arch_os $teapot]} {
 								set isCompatOS 1
 								break
 							}
 						}
 					}
@@ -306,17 +306,17 @@
 			}
 
 			set isCompatCPU 0
 			if {$arch == "tcl"} {
 				set isCompatCPU 1
-			} elseif {[string match $limitcpu $arch_cpu]} {
+			} elseif {[string match -nocase $limitcpu $arch_cpu]} {
 				set isCompatCPU 1
 			} else {
 				foreach {teapot localvariants} [array get cpuTeapotToLocal] {
 					foreach local $localvariants {
-						if {[string match $limitcpu $local] || [string match $local $limitcpu]} {
-							if {[string match $teapot $arch_cpu] || [string match $arch_cpu $teapot]} {
+						if {[string match -nocase $limitcpu $local] || [string match -nocase $local $limitcpu]} {
+							if {[string match -nocase $teapot $arch_cpu] || [string match -nocase $arch_cpu $teapot]} {
 								set isCompatCPU 1
 								break
 							}
 						}
 					}