Mercurial > emacs
comparison lisp/mouse.el @ 2632:f63bcaae7cd0
* mouse.el (mouse-buffer-menu): Don't right-justify the buffer
name; this doesn't look nice if we use a proportional font.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Mon, 03 May 1993 03:38:36 +0000 |
parents | f287613dfc28 |
children | 93a5aef19835 |
comparison
equal
deleted
inserted
replaced
2631:1e3d854828fc | 2632:f63bcaae7cd0 |
---|---|
196 (if (not (string-match "^ " | 196 (if (not (string-match "^ " |
197 (buffer-name elt))) | 197 (buffer-name elt))) |
198 (setq head (cons | 198 (setq head (cons |
199 (cons | 199 (cons |
200 (format | 200 (format |
201 "%14s %s" | 201 "%-14s %s" |
202 (buffer-name elt) | 202 (buffer-name elt) |
203 (or (buffer-file-name elt) "")) | 203 (or (buffer-file-name elt) "")) |
204 elt) | 204 elt) |
205 head)))) | 205 head)))) |
206 (setq tail (cdr tail))) | 206 (setq tail (cdr tail))) |