# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1204218558 0
# Node ID 0a7ef96a09e4d35f91fd195c3afde94b4bdee675
# Parent  e66c8a703df9872d59e5185ac4ac274ada94174f
(uniquify-buffer-base-name): Undo last change.  Should be
done in desktop.el instead.

diff -r e66c8a703df9 -r 0a7ef96a09e4 lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Feb 28 15:43:21 2008 +0000
+++ b/lisp/ChangeLog	Thu Feb 28 17:09:18 2008 +0000
@@ -1,3 +1,8 @@
+2008-02-28  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* uniquify.el (uniquify-buffer-base-name): Undo last change.  Should be
+	done in desktop.el instead.
+
 2008-02-28  Glenn Morris  <rgm@gnu.org>
 
 	* autoinsert.el (auto-insert-alist): Update to FDL 1.2.
diff -r e66c8a703df9 -r 0a7ef96a09e4 lisp/uniquify.el
--- a/lisp/uniquify.el	Thu Feb 28 15:43:21 2008 +0000
+++ b/lisp/uniquify.el	Thu Feb 28 17:09:18 2008 +0000
@@ -72,7 +72,7 @@
 ;; Add uniquify-list-buffers-directory-modes
 ;;   Stefan Monnier <monnier@cs.yale.edu> 17 Nov 2000
 ;; Algorithm and data structure changed to reduce consing with lots of buffers
-;;   Francesco Potortì <pot@gnu.org> (ideas by rms and monnier) 2001-07-18
+;;   Francesco Potortì <pot@gnu.org> (ideas by rms and monnier) 2001-07-18
 
 ;; Valuable feedback was provided by
 ;; Paul Smith <psmith@baynetworks.com>,
@@ -194,11 +194,9 @@
 ;; Used in desktop.el to save the non-uniquified buffer name
 (defun uniquify-buffer-base-name ()
   "Return the base name of the current buffer.
-Return nil if the buffer is not managed by uniquify,
-or if the base name is empty."
+Return nil if the buffer is not managed by uniquify."
   (and uniquify-managed
-       (let ((base (uniquify-item-base (car uniquify-managed))))
-	 (if (string= base "") nil base))))
+       (uniquify-item-base (car uniquify-managed))))
 
 ;;; Main entry point.