aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/help-fns.el1
2 files changed, 6 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e41e948ef29..6d80ed0f5bd 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12011-03-15 Kevin Ryde <user42@zip.com.au>
2
3 * help-fns.el (variable-at-point): Skip leading quotes, if any
4 (bug#8253).
5
12011-03-15 Stefan Monnier <monnier@iro.umontreal.ca> 62011-03-15 Stefan Monnier <monnier@iro.umontreal.ca>
2 7
3 * emacs-lisp/bytecomp.el (byte-compile-save-excursion): Change the 8 * emacs-lisp/bytecomp.el (byte-compile-save-excursion): Change the
diff --git a/lisp/help-fns.el b/lisp/help-fns.el
index e27a1e47b5c..ede80f858bf 100644
--- a/lisp/help-fns.el
+++ b/lisp/help-fns.el
@@ -534,6 +534,7 @@ If ANY-SYMBOL is non-nil, don't insist the symbol be bound."
534 (with-syntax-table emacs-lisp-mode-syntax-table 534 (with-syntax-table emacs-lisp-mode-syntax-table
535 (or (condition-case () 535 (or (condition-case ()
536 (save-excursion 536 (save-excursion
537 (skip-chars-forward "'")
537 (or (not (zerop (skip-syntax-backward "_w"))) 538 (or (not (zerop (skip-syntax-backward "_w")))
538 (eq (char-syntax (following-char)) ?w) 539 (eq (char-syntax (following-char)) ?w)
539 (eq (char-syntax (following-char)) ?_) 540 (eq (char-syntax (following-char)) ?_)