[sawfish] added window-icon for SawfishConfig

[Christopher Bratusek <chrisb src gnome org>]

commit 68b034b05185bcb9e0b30beb5a424525ecb824e0
Author: Christopher Roy Bratusek <zanghar freenet de>
Date:   Sun Sep 19 19:39:15 2010 +0200

    added window-icon for SawfishConfig

 lisp/sawfish/cfg/Makefile.in        |    5 ++++-
 lisp/sawfish/cfg/sawfish-config.png |  Bin 0 -> 2879 bytes
 lisp/sawfish/cfg/shell.jl           |    1 +
 3 files changed, 5 insertions(+), 1 deletions(-)
---
diff --git a/lisp/sawfish/cfg/Makefile.in b/lisp/sawfish/cfg/Makefile.in
index b6c8551..7d93a1f 100644
--- a/lisp/sawfish/cfg/Makefile.in
+++ b/lisp/sawfish/cfg/Makefile.in
@@ -79,15 +79,18 @@ install : all installdirs
 	  $(INSTALL_DATA) $$p $(DESTDIR)${lispdir}/sawfish/cfg/layouts; \
 	done
 	$(INSTALL_SCRIPT) main.jlc $(DESTDIR)${bindir}/sawfish-config
+	$(INSTALL_DATA) sawfish-config.png $(DESTDIR)/usr/share/icons/hicolor/32x32/apps/
 
 uninstall :
 	rm -rf $(DESTDIR)${lispdir}/sawfish/cfg
+	rm -f $(DESTDIR)/usr/share/icons/hicolor/32x32/apps/sawfish-config.png
 	rm -f $(DESTDIR)${bindir}/sawfish-config
 
 installdirs : $(top_srcdir)/mkinstalldirs
 	$(SHELL) $(top_srcdir)/mkinstalldirs $(DESTDIR)$(lispdir)/sawfish/cfg \
 	  $(DESTDIR)$(lispdir)/sawfish/cfg/widgets \
-	  $(DESTDIR)$(lispdir)/sawfish/cfg/layouts $(DESTDIR)$(bindir)
+	  $(DESTDIR)$(lispdir)/sawfish/cfg/layouts $(DESTDIR)$(bindir) \
+	  $(DESTDIR)/usr/share/icons/hicolor/32x32/apps/
 
 clean : 
 	rm -f *.jlc *~ core
diff --git a/lisp/sawfish/cfg/sawfish-config.png b/lisp/sawfish/cfg/sawfish-config.png
new file mode 100644
index 0000000..826c470
Binary files /dev/null and b/lisp/sawfish/cfg/sawfish-config.png differ
diff --git a/lisp/sawfish/cfg/shell.jl b/lisp/sawfish/cfg/shell.jl
index aece558..e709098 100644
--- a/lisp/sawfish/cfg/shell.jl
+++ b/lisp/sawfish/cfg/shell.jl
@@ -58,6 +58,7 @@
       (setq main-window (gtk-window-new 'toplevel))
 
 	(gtk-window-set-resizable main-window t)
+	(gtk-window-set-icon-name main-window "sawfish-config")
 	(gtk-window-set-default-size main-window 550 400)
 	(setq root-container (gtk-frame-new))
 	(gtk-frame-set-shadow-type root-container 'etched-in)