Mercurial > emacs
changeset 30615:35d2f8b86ee9
(bs-apply-sort-faces): Don't use window-system, since all
types of display support faces now.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Sun, 06 Aug 2000 07:31:30 +0000 |
| parents | 5dcc1588f659 |
| children | 03d5f0dc663d |
| files | lisp/bs.el |
| diffstat | 1 files changed, 8 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/bs.el Sat Aug 05 20:10:32 2000 +0000 +++ b/lisp/bs.el Sun Aug 06 07:31:30 2000 +0000 @@ -963,15 +963,14 @@ bs--current-sort-function))) (save-excursion (goto-char (point-min)) - (if (and window-system - (nth 2 sort-description) - (search-forward-regexp (nth 2 sort-description) nil t)) - (let ((inhibit-read-only t)) - (put-text-property (match-beginning 0) - (match-end 0) - 'face - (or (nth 3 sort-description) - 'region))))))) + (if (and (nth 2 sort-description) + (search-forward-regexp (nth 2 sort-description) nil t)) + (let ((inhibit-read-only t)) + (put-text-property (match-beginning 0) + (match-end 0) + 'face + (or (nth 3 sort-description) + 'region))))))) (defun bs-toggle-show-all () "Toggle show all buffers / show buffers with current configuration."