Mercurial > hg > xemacs-beta

diff lisp/w3/w3-speak.el @ 136:b980b6286996 r20-2b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b2
author cvs
date Mon, 13 Aug 2007 09:31:12 +0200
parents 34a5b81f86ba
children 15872534500d
line wrap: on
line diff
--- a/lisp/w3/w3-speak.el	Mon Aug 13 09:30:13 2007 +0200
+++ b/lisp/w3/w3-speak.el	Mon Aug 13 09:31:12 2007 +0200
@@ -192,6 +192,7 @@
     (when (> now
 	     (+ 3 url-speak-last-progress-indication))
 	  (setq url-speak-last-progress-indication now)
+	  (apply 'message (ad-get-args 0))
 	  (emacspeak-auditory-icon 'progress))))
 
 (provide 'w3-speak)