Mercurial > emacs
changeset 72244:63a604af4b8e
(cvs-get-buffer-create): Obey `noreuse' even if `name'
doesn't look like a file name.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Wed, 02 Aug 2006 14:14:19 +0000 |
| parents | 0fc019770d97 |
| children | c7ffe828b066 |
| files | lisp/ChangeLog lisp/pcvs-util.el |
| diffstat | 2 files changed, 6 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Aug 02 14:08:49 2006 +0000 +++ b/lisp/ChangeLog Wed Aug 02 14:14:19 2006 +0000 @@ -1,5 +1,8 @@ 2006-08-02 Stefan Monnier <monnier@iro.umontreal.ca> + * pcvs-util.el (cvs-get-buffer-create): Obey `noreuse' even if `name' + doesn't look like a file name. + * complete.el (PC-expand-many-files): Avoid signalling an error when the current directory doesn't exist. Reported by Micha,Ak(Bl Cadilhac.
--- a/lisp/pcvs-util.el Wed Aug 02 14:08:49 2006 +0000 +++ b/lisp/pcvs-util.el Wed Aug 02 14:14:19 2006 +0000 @@ -126,7 +126,9 @@ In such a case, the search for another buffer with the same name doesn't use the buffer name but the buffer's `list-buffers-directory' variable. If NOREUSE is non-nil, always return a new buffer." - (or (and (not (file-name-absolute-p name)) (get-buffer-create name)) + (or (and (not (file-name-absolute-p name)) + (if noreuse (generate-new-buffer name) + (get-buffer-create name))) (unless noreuse (dolist (buf (buffer-list)) (with-current-buffer buf