(eldoc-docstring-first-line): Don't match
any but the first "*" in a doc-string.
This commit is contained in:
parent
59bc82c0b9
commit
4d1243c826
2 changed files with 8 additions and 1 deletions
|
@ -1,3 +1,8 @@
|
|||
2008-11-28 Martin Rudalics <rudalics@gmx.at>
|
||||
|
||||
* emacs-lisp/eldoc.el (eldoc-docstring-first-line): Don't match
|
||||
any but the first "*" in a doc-string.
|
||||
|
||||
2008-11-28 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* format.el (format-write-file): Improve previous doc fix.
|
||||
|
|
|
@ -367,7 +367,9 @@ In the absence of INDEX, just call `eldoc-docstring-format-sym-doc'."
|
|||
(and (stringp doc)
|
||||
(substitute-command-keys
|
||||
(save-match-data
|
||||
(let ((start (if (string-match "^\\*" doc) (match-end 0) 0)))
|
||||
;; Don't use "^" in the regexp below since it may match
|
||||
;; anywhere in the doc-string.
|
||||
(let ((start (if (string-match "\\`\\*" doc) (match-end 0) 0)))
|
||||
(cond ((string-match "\n" doc)
|
||||
(substring doc start (match-beginning 0)))
|
||||
((zerop start) doc)
|
||||
|
|
Loading…
Add table
Reference in a new issue