andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(cvs-get-buffer-create): Obey noreuse' even if name'

Browse source 
doesn't look like a file name.
This commit is contained in:
Stefan Monnier 2006-08-02 14:14:19 +00:00
parent 424f4c9cfa
commit c6dbae4718
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -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.

4
lisp/pcvs-util.el
View file

@ -126,7 +126,9 @@ with `create-file-buffer' and will probably get another name than NAME.
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