diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-13 19:15:19 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2003-05-13 19:15:19 +0000 |
| commit | 2f01bedd3bc67c4994f90347fadb1e95a99f9f92 (patch) | |
| tree | 24e4295b2841809c3b2c82ec8f1c23d6a4661f37 /lisp/uniquify.el | |
| parent | 932bd503c6722ec1d84cbacf6a46169f29e4f116 (diff) | |
| download | emacs-2f01bedd3bc67c4994f90347fadb1e95a99f9f92.tar.gz | |
(uniquify-after-kill-buffer-p): Set default to t.
(uniquify-ignore-buffers-re): Revert to nil now that uniquify
is more careful about preserving buffer names.
Diffstat (limited to 'lisp/uniquify.el')
| -rw-r--r-- | lisp/uniquify.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/uniquify.el b/lisp/uniquify.el index 382b7efd580..656f5c37080 100644 --- a/lisp/uniquify.el +++ b/lisp/uniquify.el @@ -111,7 +111,7 @@ would have the following buffer names in the various styles: (const :tag "standard Emacs behavior (nil)" nil)) :require 'uniquify) -(defcustom uniquify-after-kill-buffer-p nil +(defcustom uniquify-after-kill-buffer-p t "If non-nil, rerationalize buffer names after a buffer has been killed." :type 'boolean) @@ -122,7 +122,7 @@ other buffer names are changed." :type 'boolean) ;; The default value matches certain Gnus buffers. -(defcustom uniquify-ignore-buffers-re "^\\*\\(un\\)?sent " +(defcustom uniquify-ignore-buffers-re nil "*Regular expression matching buffer names that should not be uniquified. For instance, set this to \"^draft-[0-9]+$\" to avoid having uniquify rename draft buffers even if `uniquify-after-kill-buffer-p' is non-nil and the @@ -213,7 +213,7 @@ this rationaliztion." (setf (uniquify-item-dirname (car items)) (uniquify-buffer-file-name (uniquify-item-buffer (car items)))) - ;; This shouldn't happen, but maybe there' no dirname any more. + ;; This shouldn't happen, but maybe there's no dirname any more. (unless (uniquify-item-dirname (car items)) (with-current-buffer (uniquify-item-buffer (car items)) (setq uniquify-managed nil)) |