diff options
| author | Stefan Monnier | 2003-05-13 19:15:19 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2003-05-13 19:15:19 +0000 |
| commit | dee9b44fb6e464707bb91e7571873f3f50cb7b94 (patch) | |
| tree | 37dc205e2a08af6d4deb45c9f6e55f061982b58a | |
| parent | c960446b52b72e5e9df6bfd0918b8160367ebe02 (diff) | |
| download | emacs-dee9b44fb6e464707bb91e7571873f3f50cb7b94.tar.gz emacs-dee9b44fb6e464707bb91e7571873f3f50cb7b94.zip | |
(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.
| -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: | |||
| 111 | (const :tag "standard Emacs behavior (nil)" nil)) | 111 | (const :tag "standard Emacs behavior (nil)" nil)) |
| 112 | :require 'uniquify) | 112 | :require 'uniquify) |
| 113 | 113 | ||
| 114 | (defcustom uniquify-after-kill-buffer-p nil | 114 | (defcustom uniquify-after-kill-buffer-p t |
| 115 | "If non-nil, rerationalize buffer names after a buffer has been killed." | 115 | "If non-nil, rerationalize buffer names after a buffer has been killed." |
| 116 | :type 'boolean) | 116 | :type 'boolean) |
| 117 | 117 | ||
| @@ -122,7 +122,7 @@ other buffer names are changed." | |||
| 122 | :type 'boolean) | 122 | :type 'boolean) |
| 123 | 123 | ||
| 124 | ;; The default value matches certain Gnus buffers. | 124 | ;; The default value matches certain Gnus buffers. |
| 125 | (defcustom uniquify-ignore-buffers-re "^\\*\\(un\\)?sent " | 125 | (defcustom uniquify-ignore-buffers-re nil |
| 126 | "*Regular expression matching buffer names that should not be uniquified. | 126 | "*Regular expression matching buffer names that should not be uniquified. |
| 127 | For instance, set this to \"^draft-[0-9]+$\" to avoid having uniquify rename | 127 | For instance, set this to \"^draft-[0-9]+$\" to avoid having uniquify rename |
| 128 | draft buffers even if `uniquify-after-kill-buffer-p' is non-nil and the | 128 | draft buffers even if `uniquify-after-kill-buffer-p' is non-nil and the |
| @@ -213,7 +213,7 @@ this rationaliztion." | |||
| 213 | (setf (uniquify-item-dirname (car items)) | 213 | (setf (uniquify-item-dirname (car items)) |
| 214 | (uniquify-buffer-file-name | 214 | (uniquify-buffer-file-name |
| 215 | (uniquify-item-buffer (car items)))) | 215 | (uniquify-item-buffer (car items)))) |
| 216 | ;; This shouldn't happen, but maybe there' no dirname any more. | 216 | ;; This shouldn't happen, but maybe there's no dirname any more. |
| 217 | (unless (uniquify-item-dirname (car items)) | 217 | (unless (uniquify-item-dirname (car items)) |
| 218 | (with-current-buffer (uniquify-item-buffer (car items)) | 218 | (with-current-buffer (uniquify-item-buffer (car items)) |
| 219 | (setq uniquify-managed nil)) | 219 | (setq uniquify-managed nil)) |