# HG changeset patch # User Juanma Barranquero # Date 1193590131 0 # Node ID 78e6631990446cd37167ce2e1615b6d66d6c1899 # Parent 82fb16d03f6f9a97461eca6d969d1d756217d492 *** empty log message *** diff -r 82fb16d03f6f -r 78e663199044 lisp/uniquify.el --- a/lisp/uniquify.el Sat Oct 27 17:11:45 2007 +0000 +++ b/lisp/uniquify.el Sun Oct 28 16:48:51 2007 +0000 @@ -458,15 +458,9 @@ ;; Buffer deletion ;; Rerationalize after a buffer is killed, to reduce coinciding buffer names. -;; This mechanism uses `kill-buffer-hook', which runs *before* deletion. -;; That means that the kill-buffer-hook function cannot just delete the -;; buffer -- it has to set something to do the rationalization *later*. -;; It actually puts another function on `post-command-hook'. This other -;; function runs the rationalization and then removes itself from the hook. -;; Is there a better way to accomplish this? -;; (This ought to set some global variables so the work is done only for -;; buffers with names similar to the deleted buffer. -MDE) - +;; This mechanism uses `kill-buffer-hook', which runs *before* deletion, so +;; it calls `uniquify-rerationalize-w/o-cb' to rerationalize the buffer list +;; ignoring the current buffer (which is going to be deleted anyway). (defun uniquify-maybe-rerationalize-w/o-cb () "Re-rationalize buffer names, ignoring current buffer. For use on `kill-buffer-hook'."