Mercurial > hg > xemacs-beta

diff lisp/prim/syntax.el @ 159:3bb7ccffb0c0 r20-3b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b6
author cvs
date Mon, 13 Aug 2007 09:41:43 +0200
parents 131b0175ea99
children 28f395d8dc7a
line wrap: on
line diff
--- a/lisp/prim/syntax.el	Mon Aug 13 09:40:48 2007 +0200
+++ b/lisp/prim/syntax.el	Mon Aug 13 09:41:43 2007 +0200
@@ -392,7 +392,7 @@
   (interactive)
   ;alg stolen from etag.el
   (save-excursion
-	(if (not (memq (char-syntax (preceding-char)) '(?w ?_)))
+	(if (not (memq (char-syntax (char-before)) '(?w ?_)))
 	    (while (not (looking-at "\\sw\\|\\s_\\|\\'"))
 	      (forward-char 1)))
 	(while (looking-at "\\sw\\|\\s_")