--- help-fns.el.~1.146.~ 2009-11-17 17:24:19.000000000 +1100 +++ help-fns.el 2011-03-15 09:48:49.000000000 +1100 @@ -527,11 +527,11 @@ (with-syntax-table emacs-lisp-mode-syntax-table (or (condition-case () (save-excursion + (skip-chars-forward "'") (or (not (zerop (skip-syntax-backward "_w"))) (eq (char-syntax (following-char)) ?w) (eq (char-syntax (following-char)) ?_) (forward-sexp -1)) - (skip-chars-forward "'") (let ((obj (read (current-buffer)))) (and (symbolp obj) (boundp obj) obj))) (error nil))