[sawfish] re-added patch for making sawfish-ui strings fully translatable

[Christopher Bratusek <chrisb src gnome org>]

commit c31c972e447604506eada827d41c0cd6e306626a
Author: chrisb <zanghar freenet de>
Date:   Fri Jul 24 20:54:52 2009 +0200

    re-added patch for making sawfish-ui strings fully translatable

 ChangeLog               |    2 ++
 lisp/sawfish/ui/slot.jl |    5 ++++-
 man/news.texi           |    1 +
 3 files changed, 7 insertions(+), 1 deletions(-)
---
diff --git a/ChangeLog b/ChangeLog
index 2d20c99..8ffd9eb 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -12,6 +12,8 @@
 	* sawfish.desktop
 	* sawfish-wm.dektop: fixed a typo, removed unneeded entries
 
+	* lisp/sawfish/ui/slot.jl: Re-add patch to make strings fully translatable [Alexey I. Froloff]
+
 2009-07-18  Christopher Bratusek <zanghar freenet de>
 	* lisp/sawfish/gtk/widget.jl: 	- allow negative values in spinbuttons in sawfish-ui
 					- connect spinbuttons to value-changed signal (allows typing in the value manually)
diff --git a/lisp/sawfish/ui/slot.jl b/lisp/sawfish/ui/slot.jl
index 68fade0..76d972d 100644
--- a/lisp/sawfish/ui/slot.jl
+++ b/lisp/sawfish/ui/slot.jl
@@ -100,7 +100,10 @@
 		   (cons slot (table-ref dependence-table depends))))
 
       ;; create the widget
-      (let* ((callback (lambda () (slot-changed slot))))
+      (let* ((callback (lambda () (slot-changed slot)))
+	     (doc (if (or (null doc) (string= doc ""))
+		      doc
+		    (_ doc))))
 	(if (widget-accepts-doc-string-p (or (car type) type))
 	    (slot-widget-set slot (make-widget type callback doc))
 	  (slot-doc-set slot doc)
diff --git a/man/news.texi b/man/news.texi
index e1454b3..3a4926a 100644
--- a/man/news.texi
+++ b/man/news.texi
@@ -38,6 +38,7 @@ they occurred between. For more detailed information see the
 
 @item Added fullscreen, fullscreen-xinerama and new-workspace matches [Jeremy Hankins]
 
+ item Make strings in sawfish-ui fully translatable [Alexey I. Froloff]
 @end itemize
 @item Other Changes:
 @itemize @minus