Mercurial > hg > xemacs-beta

diff lisp/w3/w3-speak.el @ 22:8fc7fe29b841 r19-15b94

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b94
author cvs
date Mon, 13 Aug 2007 08:50:29 +0200
parents 0293115a14e9
children 131b0175ea99
line wrap: on
line diff
--- a/lisp/w3/w3-speak.el	Mon Aug 13 08:50:06 2007 +0200
+++ b/lisp/w3/w3-speak.el	Mon Aug 13 08:50:29 2007 +0200
@@ -168,15 +168,10 @@
 delimiters. We then turn on voice-lock-mode. 
 Interactive prefix arg does the opposite. "
   (interactive "P")
-  (declare (special w3-delimit-links w3-delimit-emphasis w3-echo-link))
+  (declare (special w3-echo-link))
   (setq w3-echo-link 'text)
   (if arg
-      (progn
-	(setq w3-delimit-links 'guess 
-	      w3-delimit-emphasis 'guess)
-	(remove-hook 'w3-mode-hook 'w3-speak-mode-hook))
-    (setq w3-delimit-links nil
-          w3-delimit-emphasis nil)
+      (remove-hook 'w3-mode-hook 'w3-speak-mode-hook)
     (add-hook 'w3-mode-hook 'w3-speak-mode-hook)))
 
 (defun w3-speak-browse-page ()