mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-25 23:10:47 -08:00
Code Issues Projects Releases Wiki Activity

(uniquify-buffer-base-name): If the base name is an empty string,

Browse source 
return nil to allow the caller to default to the buffer name.
This commit is contained in:
Juanma Barranquero 2008-02-27 16:24:08 +00:00
parent 9c9086d306
commit 4fbbba1d35
2 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/ChangeLog
View file

@ -1,7 +1,13 @@
2008-02-27 Juanma Barranquero <lekktu@gmail.com>
* uniquify.el (uniquify-buffer-base-name): If the base name is an
empty string, return nil to allow the caller to default to the
buffer name.
2008-02-26 Jason Rumney <jasonr@gnu.org>
* files.el (make-auto-save-file-name): Encode more characters in
non-file buffer names. Use url-encoding.
non-file buffer names. Use url-encoding.
2008-02-26 Juanma Barranquero <lekktu@gmail.com>

3
lisp/uniquify.el
View file

@ -194,7 +194,8 @@ It actually holds the list of `uniquify-item's corresponding to the conflict.")
"Return the base name of the current buffer.
Return nil if the buffer is not managed by uniquify."
(and uniquify-managed
(uniquify-item-base (car uniquify-managed))))
(let ((base (uniquify-item-base (car uniquify-managed))))
(if (string= base "") nil base))))
;;; Main entry point.