[sawfish] added note to display-message-with-timeout about displaying it endlessly

[Christopher Bratusek <chrisb src gnome org>]

commit 869b6e822656bc52cf26a4d2d05947c61db7f36c
Author: chrisb <zanghar freenet de>
Date:   Sun Sep 20 21:41:20 2009 +0200

    added note to display-message-with-timeout about displaying it endlessly

 lisp/sawfish/wm/commands/user.jl |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)
---
diff --git a/lisp/sawfish/wm/commands/user.jl b/lisp/sawfish/wm/commands/user.jl
index 0c6911a..d104b16 100644
--- a/lisp/sawfish/wm/commands/user.jl
+++ b/lisp/sawfish/wm/commands/user.jl
@@ -78,13 +78,14 @@
 
   ;; display-message-with-timeout
   ;; like display-message, but it dissapears
-  ;; after `timemout' seconds
+  ;; after `timemout' seconds, displayed endlessly
+  ;; (like without timeout), if a negative value is given
   (define (display-message-with-timeout message timeout)
     (display-message message)
     (make-timer (lambda () (display-message nil)) timeout))
 
   ;; program-available
-  ;; return true, if program `cmd' is in path
+  ;; return true, if program `cmd' is in PATH
   (define (program-available cmd)
     (some (lambda (dir)
       (file-exists-p (concat dir "/" cmd)))