From b538cddb15fe7c5adca98283566bdd359126e08a Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Wed, 25 Mar 2009 08:47:06 +0000
Subject: Fix [Bug 1871101].

---
 ChangeLog                |  5 +++++
 win/wish.exe.manifest.in | 47 +++++++++++++++++++++++++++--------------------
 2 files changed, 32 insertions(+), 20 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index bacee82..e7a4cdc 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2009-03-25  Donal K. Fellows  <dkf@users.sf.net>
+
+	* win/wish.exe.manifest.in: [Bug 1871101]: Add magic to make Tk not be
+	blurred on Vista with large fonts.
+
 2009-03-03  Pat Thoyts  <patthoyts@users.sourceforge.net>
 
 	* generic/tkFileFilter.c: Backported some fixes for uninitialized
diff --git a/win/wish.exe.manifest.in b/win/wish.exe.manifest.in
index 236768e..2cae0c0 100644
--- a/win/wish.exe.manifest.in
+++ b/win/wish.exe.manifest.in
@@ -1,22 +1,29 @@
 <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
-<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
-<assemblyIdentity
-	version="@TK_WIN_VERSION@"
-	processorArchitecture="@MACHINE@"
-	name="Tcl.Tk.wish"
-	type="win32"
-/>
-<description>Tcl/Tk windowing shell (wish)</description>
-<dependency>
-<dependentAssembly>
-<assemblyIdentity
-	type="win32"
-	name="Microsoft.Windows.Common-Controls"
-	version="6.0.0.0"
-	processorArchitecture="@MACHINE@"
-	publicKeyToken="6595b64144ccf1df"
-	language="*"
-/>
-</dependentAssembly>
-</dependency>
+<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"
+	xmlns:asmv3="urn:schemas-microsoft-com:asm.v3">
+    <assemblyIdentity
+	    version="@TK_WIN_VERSION@"
+	    processorArchitecture="@MACHINE@"
+	    name="Tcl.Tk.wish"
+	    type="win32"
+	/>
+    <description>Tcl/Tk windowing shell (wish)</description>
+    <asmv3:application>
+	<asmv3:windowsSettings
+		xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">
+	    <dpiAware>true</dpiAware>
+	</asmv3:windowsSettings>
+    </asmv3:application>
+    <dependency>
+	<dependentAssembly>
+	    <assemblyIdentity
+		    type="win32"
+		    name="Microsoft.Windows.Common-Controls"
+		    version="6.0.0.0"
+		    processorArchitecture="@MACHINE@"
+		    publicKeyToken="6595b64144ccf1df"
+		    language="*"
+		/>
+	</dependentAssembly>
+    </dependency>
 </assembly>
-- 
cgit v0.12