Mercurial > emacs
changeset 106367:1168a9885b5d
2009-12-02 Michael Welsh Duggan <mwd at cert.org>
(woman-make-bufname): Handle man-pages with "." in the name. (Bug#5038)
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Wed, 02 Dec 2009 03:01:44 +0000 |
| parents | b78c33f367a0 |
| children | 6bd27233297a |
| files | lisp/ChangeLog lisp/woman.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Dec 02 03:00:41 2009 +0000 +++ b/lisp/ChangeLog Wed Dec 02 03:01:44 2009 +0000 @@ -1,3 +1,8 @@ +2009-12-02 Michael Welsh Duggan <mwd@cert.org> + + * woman.el (woman-make-bufname): Handle man-pages with "." in the + name. (Bug#5038) + 2009-12-02 Andreas Politz <politza@fh-trier.de> (tiny change) * ido.el (ido-file-internal): Handle filenames at point that do
--- a/lisp/woman.el Wed Dec 02 03:00:41 2009 +0000 +++ b/lisp/woman.el Wed Dec 02 03:01:44 2009 +0000 @@ -1649,7 +1649,7 @@ (defun woman-make-bufname (bufname) "Create an unambiguous buffer name from BUFNAME." - (let ((dot (string-match "\\." bufname))) + (let ((dot (string-match "\\.[^.]*\\'" bufname))) (if dot (setq bufname (concat (substring bufname (1+ dot)) " " (substring bufname 0 dot))))