mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(bs-mode-font-lock-keywords): Avoid testing for XEmacs.

Browse Source
This commit is contained in:
Dave Love 2000-08-16 21:42:10 +00:00
parent b705725947
commit a5b09d5a75
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/bs.el
View File

@ -195,12 +195,11 @@ return a string representing the columns value."
'(1 font-lock-type-face append) '(1 'bold append)) '(1 font-lock-type-face append) '(1 'bold append))
;; Buffername embedded by * ;; Buffername embedded by *
(list "^\\(.*\\*.*\\*.*\\)$" (list "^\\(.*\\*.*\\*.*\\)$"
1 (if bs--running-in-xemacs 1
;; problem in XEmacs with font-lock-constant-face ;; problem in XEmacs with font-lock-constant-face
(if (facep 'font-lock-constant-face) (if (facep 'font-lock-constant-face)
'font-lock-constant-face 'font-lock-constant-face
'font-lock-comment-face) 'font-lock-comment-face))
'font-lock-constant-face))
;; Dired-Buffers ;; Dired-Buffers
'("^..\\(.*Dired by .*\\)$" 1 font-lock-function-name-face) '("^..\\(.*Dired by .*\\)$" 1 font-lock-function-name-face)
;; the star for modified buffers ;; the star for modified buffers