{"thread":{"id":"16348","subject":"[PATCH] git-gui: try to provide a window icon under X","startedAt":"2008-11-16T02:09:38Z","lastAt":"2008-11-16T02:42:32Z","messageCount":2,"participants":["Giuseppe Bilotta"],"isPatch":true,"patchVersion":1,"patchTotal":null},"messages":[{"id":"95923","messageId":"1226801378-25501-1-git-send-email-giuseppe.bilotta@gmail.com","threadId":"16348","inReplyTo":null,"subject":"[PATCH] git-gui: try to provide a window icon under X","fromName":"Giuseppe Bilotta","fromEmail":"giuseppe.bilotta@gmail.com","sentAt":"2008-11-16T02:09:38Z","receivedAt":"2008-11-16T02:09:38Z","isPatch":true,"sender":{"key":"giuseppe.bilotta@gmail.com","avatar":"https://avatars.githubusercontent.com/u/1464?v=4"},"body":"When running under X, we try to set up a window icon by providing a\nhand-crafted 16x16 Tk photo image equivalent to the .ico. Wrap in a\ncatch because the earlier Tcl/Tk 8.4 releases didn't provide the 'wm\niconphoto' command.\n---\n git-gui/git-gui.sh |   22 ++++++++++++++++++++++\n 1 files changed, 22 insertions(+), 0 deletions(-)\n\ndiff --git a/git-gui/git-gui.sh b/git-gui/git-gui.sh\nindex cf9ef6e..6ed6230 100755\n--- a/git-gui/git-gui.sh\n+++ b/git-gui/git-gui.sh\n@@ -597,6 +597,28 @@ if {[is_Windows]} {\n \tif {![info exists env(DISPLAY)]} {\n \t\tset env(DISPLAY) :9999\n \t}\n+} else {\n+\tcatch {\n+\t\timage create photo gitlogo -width 16 -height 16\n+\n+\t\tgitlogo put #33CC33 -to  7  0  9  2\n+\t\tgitlogo put #33CC33 -to  4  2 12  4\n+\t\tgitlogo put #33CC33 -to  7  4  9  6\n+\t\tgitlogo put #CC3333 -to  4  6 12  8\n+\t\tgitlogo put gray26  -to  4  9  6 10\n+\t\tgitlogo put gray26  -to  3 10  6 12\n+\t\tgitlogo put gray26  -to  8  9 13 11\n+\t\tgitlogo put gray26  -to  8 11 10 12\n+\t\tgitlogo put gray26  -to 11 11 13 14\n+\t\tgitlogo put gray26  -to  3 12  5 14\n+\t\tgitlogo put gray26  -to  5 13\n+\t\tgitlogo put gray26  -to 10 13\n+\t\tgitlogo put gray26  -to  4 14 12 15\n+\t\tgitlogo put gray26  -to  5 15 11 16\n+\t\tgitlogo redither\n+\n+\t\twm iconphoto . -default gitlogo\n+\t}\n }\n \n ######################################################################\n-- \n1.5.6.5\n"},{"id":"95926","messageId":"1226803352-26513-1-git-send-email-giuseppe.bilotta@gmail.com","threadId":"16348","inReplyTo":"1226801378-25501-1-git-send-email-giuseppe.bilotta@gmail.com","subject":"[PATCH] git-gui: try to provide a window icon under X","fromName":"Giuseppe Bilotta","fromEmail":"giuseppe.bilotta@gmail.com","sentAt":"2008-11-16T02:42:32Z","receivedAt":"2008-11-16T02:42:32Z","isPatch":true,"sender":{"key":"giuseppe.bilotta@gmail.com","avatar":"https://avatars.githubusercontent.com/u/1464?v=4"},"body":"When running under X, we try to set up a window icon by providing a\nhand-crafted 16x16 Tk photo image equivalent to the .ico. Wrap in a\ncatch because the earlier Tcl/Tk 8.4 releases didn't provide the 'wm\niconphoto' command.\n\nSigned-off-by: Giuseppe Bilotta <giuseppe.bilotta@gmail.com>\n---\n\nResend, forgot the signed-off line\n\n git-gui/git-gui.sh |   22 ++++++++++++++++++++++\n 1 files changed, 22 insertions(+), 0 deletions(-)\n\ndiff --git a/git-gui/git-gui.sh b/git-gui/git-gui.sh\nindex cf9ef6e..6ed6230 100755\n--- a/git-gui/git-gui.sh\n+++ b/git-gui/git-gui.sh\n@@ -597,6 +597,28 @@ if {[is_Windows]} {\n \tif {![info exists env(DISPLAY)]} {\n \t\tset env(DISPLAY) :9999\n \t}\n+} else {\n+\tcatch {\n+\t\timage create photo gitlogo -width 16 -height 16\n+\n+\t\tgitlogo put #33CC33 -to  7  0  9  2\n+\t\tgitlogo put #33CC33 -to  4  2 12  4\n+\t\tgitlogo put #33CC33 -to  7  4  9  6\n+\t\tgitlogo put #CC3333 -to  4  6 12  8\n+\t\tgitlogo put gray26  -to  4  9  6 10\n+\t\tgitlogo put gray26  -to  3 10  6 12\n+\t\tgitlogo put gray26  -to  8  9 13 11\n+\t\tgitlogo put gray26  -to  8 11 10 12\n+\t\tgitlogo put gray26  -to 11 11 13 14\n+\t\tgitlogo put gray26  -to  3 12  5 14\n+\t\tgitlogo put gray26  -to  5 13\n+\t\tgitlogo put gray26  -to 10 13\n+\t\tgitlogo put gray26  -to  4 14 12 15\n+\t\tgitlogo put gray26  -to  5 15 11 16\n+\t\tgitlogo redither\n+\n+\t\twm iconphoto . -default gitlogo\n+\t}\n }\n \n ######################################################################\n-- \n1.5.6.5\n"}]}