* lisp/help-fns.el (variable-at-point): Skip leading quotes, if any

(bug#8253).
This commit is contained in:
Kevin Ryde 2011-03-14 22:36:07 -04:00 committed by Stefan Monnier
parent 0a57d256af
commit 047b2bb9a2
2 changed files with 6 additions and 0 deletions

View file

@ -1,3 +1,8 @@
2011-03-15 Kevin Ryde <user42@zip.com.au>
* help-fns.el (variable-at-point): Skip leading quotes, if any
(bug#8253).
2011-03-15 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/bytecomp.el (byte-compile-save-excursion): Change the

View file

@ -534,6 +534,7 @@ If ANY-SYMBOL is non-nil, don't insist the symbol be bound."
(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)) ?_)