[PATCH 2/2] gitk: provide a 32x32 window icon based on the git logo

From: Stephen Boyd <bebarino@gmail.com>
Date: Mar 19, 2009, 08:54 UTC
Message-ID: <9a1d5cc34e91679beec3e82c52512f33b2ba9d7e.1237451887.git.bebarino@gmail.com>
In-Reply-To: <61242ff6c582f3b82b7ddf4db75bdad45f0a457e.1237451887.git.bebarino@gmail.com>

Signed-off-by: Stephen Boyd <bebarino@gmail.com>
---
 gitk |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/gitk b/gitk
index cfbb699..5a09eca 100755
--- a/gitk
+++ b/gitk
@@ -10901,7 +10901,10 @@ catch {
 	gitlogo copy gitlogoplus  -to 11 9
 	image delete gitlogoplus
 
-	wm iconphoto . -default gitlogo
+	image create photo gitlogo32    -width 32 -height 32
+	gitlogo32 copy gitlogo -zoom 2 2
+
+	wm iconphoto . -default gitlogo gitlogo32
 }
 # wait for the window to become visible
 tkwait visibility .

-- 
1.6.2