File uni2ascii-fix-u2a.diff of Package uni2ascii
--- u2a.tcl.orig 2006-04-17 22:08:57.000000000 +0200
+++ u2a.tcl 2006-04-18 12:05:50.000000000 +0200
@@ -153,7 +153,7 @@
} elseif {[info exists ::env(TEMP)]} {
set TempDir $::env(TEMP);
} else {
- if { $SystemInfo(System)== "MSWindows"} {
+ if {[string match $SystemInfo(System) MSWindows]} {
set TempDir "C:\tmp";
} else {
set TempDir "/tmp";