Compatibility: Define face alias mode-line for XEmacs

* lisp/org-faces.el: Define face alias mode-line for XEmacs (it's
  called modeline there).
This commit is contained in:
Achim Gratz 2013-01-06 17:48:39 +01:00
parent 4e2f6d7d8f
commit d524e7d611
1 changed files with 3 additions and 0 deletions

View File

@ -44,6 +44,9 @@
(set-face-doc-string new-face docstring)))))
(put 'org-copy-face 'lisp-indent-function 2)
(when (featurep 'xemacs)
(put 'mode-line 'face-alias 'modeline))
(defgroup org-faces nil
"Faces in Org-mode."
:tag "Org Faces"