Mercurial > emacs
comparison lisp/msb.el @ 14427:ac3101efc47e
(msb--choose-menu): Fix error format string.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Mon, 29 Jan 1996 23:17:49 +0000 |
| parents | 7e97c9b8801f |
| children | 45830d037b44 |
comparison
equal
deleted
inserted
replaced
| 14426:9f18c1b097ce | 14427:ac3101efc47e |
|---|---|
| 661 (error (unless msb--error | 661 (error (unless msb--error |
| 662 (setq msb--error | 662 (setq msb--error |
| 663 (format | 663 (format |
| 664 "In msb-menu-cond, error for buffer `%s'." | 664 "In msb-menu-cond, error for buffer `%s'." |
| 665 (buffer-name buffer))) | 665 (buffer-name buffer))) |
| 666 (error msb--error)))))) | 666 (error "%s" msb--error)))))) |
| 667 | 667 |
| 668 ;; Return (SORT-KEY TITLE . BUFFER-LIST) or nil if the | 668 ;; Return (SORT-KEY TITLE . BUFFER-LIST) or nil if the |
| 669 ;; buffer-list is empty. | 669 ;; buffer-list is empty. |
| 670 (defun msb--create-sort-item (function-info) | 670 (defun msb--create-sort-item (function-info) |
| 671 (let ((buffer-list (eval (aref function-info 0)))) | 671 (let ((buffer-list (eval (aref function-info 0)))) |