diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2000-08-06 07:32:15 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2000-08-06 07:32:15 +0000 |
| commit | 6968a481f5e1c375b403263e233e9292196e1b79 (patch) | |
| tree | cc7b132ceabc62604de706404066f5b61879cb0c /lisp | |
| parent | e49aa397e852ffb6826439a728497e2d05cfbb48 (diff) | |
| download | emacs-6968a481f5e1c375b403263e233e9292196e1b79.tar.gz emacs-6968a481f5e1c375b403263e233e9292196e1b79.tar.bz2 emacs-6968a481f5e1c375b403263e233e9292196e1b79.zip | |
(bs-apply-sort-faces): Don't use window-system, since all
types of display support faces now.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/bs.el | 17 |
2 files changed, 13 insertions, 9 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 54d733a4ecc..9c0ecaca057 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2000-08-06 Eli Zaretskii <eliz@is.elta.co.il> + + * bs.el (bs-apply-sort-faces): Don't use window-system, since all + types of display support faces now. + 2000-08-05 Gerd Moellmann <gerd@gnu.org> * pcvs.el (require): Require `cl' during compilation, only. diff --git a/lisp/bs.el b/lisp/bs.el index 2a2cf700c53..20fe02c363d 100644 --- a/lisp/bs.el +++ b/lisp/bs.el @@ -963,15 +963,14 @@ Default is `bs--current-sort-function'." 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." |