[sawfish] set window-icon for sawfish-config error-dialog

[Christopher Bratusek <chrisb src gnome org>]

commit 889414515fddd535f95b807a03e7226d1f7d75da
Author: Christopher Roy Bratusek <zanghar freenet de>
Date:   Sat Aug 21 22:30:42 2010 +0200

    set window-icon for sawfish-config error-dialog

 lisp/sawfish/cfg/shell.jl |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)
---
diff --git a/lisp/sawfish/cfg/shell.jl b/lisp/sawfish/cfg/shell.jl
index 69e9253..7617871 100644
--- a/lisp/sawfish/cfg/shell.jl
+++ b/lisp/sawfish/cfg/shell.jl
@@ -271,6 +271,7 @@
 	  (button (stock-button 'ok))
 	  (func (lambda () (throw 'quit 1))))
       (gtk-window-set-title window "SawfishConfig error")
+      (gtk-window-set-icon-name window "gtk-info")
       (gtk-container-set-border-width window 10)
       (gtk-label-set-line-wrap label t)
       (gtk-widget-set-size-request label 225 45)