[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp/emacs-lisp eldoc.el
From: |
Martin Rudalics |
Subject: |
[Emacs-diffs] emacs/lisp/emacs-lisp eldoc.el |
Date: |
Fri, 28 Nov 2008 10:22:53 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Martin Rudalics <m061211> 08/11/28 10:22:53
Modified files:
lisp/emacs-lisp: eldoc.el
Log message:
(eldoc-docstring-first-line): Don't match
any but the first "*" in a doc-string.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/emacs-lisp/eldoc.el?cvsroot=emacs&r1=1.52&r2=1.53
Patches:
Index: eldoc.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/eldoc.el,v
retrieving revision 1.52
retrieving revision 1.53
diff -u -b -r1.52 -r1.53
--- eldoc.el 6 May 2008 03:21:16 -0000 1.52
+++ eldoc.el 28 Nov 2008 10:22:53 -0000 1.53
@@ -367,7 +367,9 @@
(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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp/emacs-lisp eldoc.el,
Martin Rudalics <=