Don't display wrong ElDoc information when inside ELisp strings or comments
* lisp/progmodes/elisp-mode.el (elisp--fnsym-in-current-sexp): Since forward-sexp assumes point is not in a string or comment, avoid calling it and then checking if point is inside a string, since that sometimes will fail with awkward results. (Bug#35567)
This commit is contained in:
parent
08d7cabc92
commit
4e0c5830da
1 changed files with 6 additions and 8 deletions
|
@ -1571,14 +1571,12 @@ In the absence of INDEX, just call `eldoc-docstring-format-sym-doc'."
|
|||
;; Return a list of current function name and argument index.
|
||||
(defun elisp--fnsym-in-current-sexp ()
|
||||
(save-excursion
|
||||
(let ((argument-index (1- (elisp--beginning-of-sexp))))
|
||||
;; If we are at the beginning of function name, this will be -1.
|
||||
(when (< argument-index 0)
|
||||
(setq argument-index 0))
|
||||
;; Don't do anything if current word is inside a string.
|
||||
(if (= (or (char-after (1- (point))) 0) ?\")
|
||||
nil
|
||||
(list (elisp--current-symbol) argument-index)))))
|
||||
(unless (nth 8 (syntax-ppss))
|
||||
(let ((argument-index (1- (elisp--beginning-of-sexp))))
|
||||
;; If we are at the beginning of function name, this will be -1.
|
||||
(when (< argument-index 0)
|
||||
(setq argument-index 0))
|
||||
(list (elisp--current-symbol) argument-index)))))
|
||||
|
||||
;; Move to the beginning of current sexp. Return the number of nested
|
||||
;; sexp the point was over or after.
|
||||
|
|
Loading…
Add table
Reference in a new issue