Changeset 4058 for trunk/lisp/buff-menu.el

Timestamp:

04/16/06 21:46:31 (3 years ago)

Author:

miyoshi

Message:

Sync up with Emacs CVS HEAD.

Files:

• trunk/lisp/buff-menu.el (modified) (2 diffs)

trunk/lisp/buff-menu.el

@@ -707 +707 @@
-    (when Buffer-menu-use-header-line
-      (let ((pos 0))
-spaces in the header into stretch specs so they work
-
-
+whitespace chars in the header into stretch specs so
+they work 
+\n
-          (setq pos (match-end 0))
-          (put-text-property (match-beginning 0) pos 'display
@@ -727 +727 @@
-      (setq standard-output (current-buffer))
-      (unless Buffer-menu-use-header-line
+        ;; Use U+2014 (EM DASH) to underline if possible, else U+002D (HYPHEN-MINUS)
-        (let ((underline (if (char-displayable-p ?—) ?— ?-)))
-          (insert header