From ee5861c8362acdab691019496924fd2d10d595bc Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Sun, 5 Jan 2003 17:46:42 +0000 Subject: [PATCH] (Buffer-menu-buffer+size): Don't clobber buffer name. --- lisp/ChangeLog | 5 +++++ lisp/buff-menu.el | 6 ++++-- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 815a1af9cf6..682e03904c2 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-01-05 Andreas Schwab + + * buff-menu.el (Buffer-menu-buffer+size): Don't clobber buffer + name. + 2003-01-05 Dave Love * language/european.el ("Latin-6", "Croatian"): New. diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index a49244ce60d..205a8ab7d32 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -1,6 +1,6 @@ ;;; buff-menu.el --- buffer menu main function and support functions -;; Copyright (C) 1985, 86, 87, 93, 94, 95, 2000, 2001, 2002 +;; Copyright (C) 1985, 86, 87, 93, 94, 95, 2000, 2001, 2002, 2003 ;; Free Software Foundation, Inc. ;; Maintainer: FSF @@ -529,7 +529,9 @@ For more information, see the function `buffer-menu'." (- Buffer-menu-buffer+size-width (max (length size) 3) 2)) - ":")))) ; narrow ellipsis + ":"))) ; narrow ellipsis + ;; Don't put properties on (buffer-name). + (setq name (copy-sequence name))) (add-text-properties 0 (length name) name-props name) (add-text-properties 0 (length size) size-props size) (concat name -- 2.39.2