From 3759f14b25c206440494cee508e360c391dafb38 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Sun, 12 Sep 1999 20:21:44 +0000
Subject: [PATCH] (mode-line): Replaces `modeline'. (toplevel): Make `modeline'
 an alias for `mode-line'.

---
 lisp/faces.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lisp/faces.el b/lisp/faces.el
index c8df93071cb..bbf037aabac 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1352,7 +1352,7 @@ created."
   :group 'basic-faces)
 
 
-(defface modeline
+(defface mode-line
   '((((type x) (class color))
      (:box (:line-width 2 :style released-button) :background "grey75"))
     (t
@@ -1360,6 +1360,8 @@ created."
   "Basic mode line face."
   :group 'basic-faces)
 
+;; Make `modeline' an alias for `mode-line', for compatibility.
+(put 'modeline 'face-alias 'mode-line)
 
 (defface header-line
   '((((type x) (class color))
-- 
2.39.5